SplitParts Property

Returns a SplitParts collection that represents the portions of a task. Read-only.

Example

The following example returns the number of task portions for each task in the active project.

Sub CountTaskPortions()
    Dim T As Task, HowMany As Long

    For Each T In ActiveProject.Tasks
        HowMany = 0
        If Not (T Is Nothing) Then
            HowMany = HowMany + T.SplitParts.Count
            MsgBox T.Name & ": " & HowMany & " task portion(s)"
        End If

    Next T

End Sub

Applies to | Task Object, Tasks Collection Object

See Also | Split Method | SplitPart Object, SplitParts Collection Object | SplitTask Method