Task.SplitParts property (Project)
Gets a SplitParts collection that represents the portions of a split task. Read-only SplitParts.
expression A variable that represents a Task object.
The following example returns the number of parts 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
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.