OutlineParent Property

Returns a Task object representing the parent 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 | Task Object, Tasks Collection Object

See Also | OutlineChildren Property | Parent Property