Objet Subprojects (Project)

Article
04/07/2023

Contient une collection d’objets Subproject .

Propriétés

Nom
Application
Count
Élément
Parent

Exemples

Utilisation de l’objet de collection Subprojects

Utilisez Subprojects (index), où index est l’index du sous-projet ou le nom de la tâche récapitulative du projet, pour renvoyer un seul objet Subproject . L'exemple suivant montre comment empêcher les modifications apportées au sous-projet spécifié d'un projet maître d'être automatiquement apportées au projet source.

ActiveProject.Subprojects("Arcadia Bay Online Catalog Plan").LinkToSource = False

Obtention de l’objet de collection Subprojects

Utilisez la propriété Subprojects pour renvoyer une collection Subprojects . L’exemple suivant montre comment avertir l’utilisateur si l’un des sous-projets du projet actif ne se trouve pas sur le disque dur.

Dim SubProj As Subproject 

For Each SubProj in ActiveProject.Subprojects 

 If UCase(Left$(SubProj.Path, 1)) <> "C" Then 

 MsgBox Right$(SubProj.Path, InStrRev(SubProj.Path, "\") - 1) & _ 

 " is not on your local hard disk.", vbExclamation 

 End If 

Next SubProj

Remarque

Si vous ajoutez deux sous-projets portant le même nom à un projet, celui-ci devient un objet statique et ne fournit pas d’informations sur les sous-projets supplémentaires ajoutés à votre projet. Cela se poursuit pendant toute la durée du fichier projet, même si l’un des sous-projets portant le même nom est supprimé.

Vous pouvez essayer cette opération en effectuant une copie de l’un des sous-projets de votre projet, en la plaçant dans un autre dossier, puis en l’ajoutant à nouveau à votre projet. Les sous-projets ne signalent pas le nouveau projet et ne fournissent pas d’informations sur les sous-projets ajoutés à ce projet par la suite.

Voir aussi

Modèle objet Project

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.

Partager via