title | ms.service | api_name | ms.assetid | ms.date | ms.localizationpriority | |
---|---|---|---|---|---|---|
Project.OutlineChildren property (Project) |
project-server |
|
f0feaf89-04ad-4523-7b15-eff6573f6ddd |
06/08/2017 |
medium |
Gets a Tasks collection representing the children of a task in the outline structure. Read-only Tasks.
expression. OutlineChildren
expression A variable that represents a Project object.
The following example displays the names of all tasks at the same outline level as the selected task.
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
[!includeSupport and feedback]