Propriedade Cell.Task (Project)
Obtém um objeto Task que representa a tarefa na célula ativa. Somente leitura tarefa.
expression. Task
Expressão Uma variável que representa um objeto Cell .
O exemplo a seguir exibe os nomes de todas as tarefas no mesmo nível da estrutura de tópicos da tarefa selecionada.
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
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.