Share via


Propriété Cell.Task (Project)

Obtient un objet Task représentant la tâche dans la cellule active. Type de données Task en lecture seule.

Syntaxe

expression. Task

Expression Variable qui représente un objet Cell .

Exemple

L’exemple suivant affiche le nom de toutes les tâches au même niveau hiérarchique que la tâche sélectionnée.

Sub Siblings() 
 
 Dim MyParent As Task 
 Dim Sibling As Task 
 Dim Temp As String 
 
 Set MyParent = ActiveCell.Task.OutlineParent 
 
 For Each Sibling In MyParent.OutlineChildren 
 Temp = Sibling.Name & ListSeparator & " " & Temp 
 Next Sibling 
 
 Temp = Left$(Temp, Len(Temp) - Len(ListSeparator & " ")) 
 MsgBox Temp 
 
End Sub

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.