Share via


OutlineChildren Property

Returns a Tasks collection representing the children of a task in the outline. Read-only.

Example

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

Applies to | Project Object, Projects Collection Object | Task Object, Tasks Collection Object

See Also | OutlineParent Property