Objet TaskDependencies (Project)
Contient une collection d’objets TaskDependency .
Exemple
Utilisation de l'objet TaskDependency
Utilisez TaskDependencies (index), où index est l’index de dépendance, pour renvoyer un objet TaskDependency unique. L'exemple suivant montre comment ajouter 1,5 jour de retard à la liaison entre la tâche spécifiée et le prédécesseur spécifié dans sa première interdépendance de tâche.
ActiveProject.Tasks("Draft Initial Business Case").TaskDependencies(1).Lag = "1.5d"
Utilisation de la collection TaskDependencies
Utilisez la propriété TaskDependencies pour renvoyer une collection TaskDependencies . L’exemple suivant montre comment examiner chacun des prédécesseurs de la tâche spécifiée et afficher un message pour ceux dont le niveau de priorité minimal est « Haut ».
Dim TaskDep As TaskDependency
For Each TaskDep In ActiveProject.Tasks("Write Requirements Brief").TaskDependencies
If TaskDep.From.Priority > 500 Then
MsgBox "Task #" & TaskDep.From.ID & " (" & TaskDep.From.Name & ") " & _
"has a priority higher than medium."
End If
Next TaskDep
Utilisez la méthode Add pour ajouter un objet TaskDependency à la collection TaskDependencies . L’exemple suivant montre comment lier « Preliminary Research & Approval » en tant que prédécesseur de « Draft Initial Business Case » dans une relation Fin à début.
ActiveProject.Tasks("Draft Initial Business Case").TaskDependencies.Add ActiveProject.Tasks("Preliminary Research & Approval"), pjFinishToStart
Méthodes
| Nom |
|---|
| Add |
Propriétés
| Nom |
|---|
| Application |
| Count |
| Élément |
| Parent |
Voir aussi
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.