Segment.AbsoluteIndex

Property AbsoluteIndex As Long

The AbsoluteIndex property returns the index value of the subpath within the curve (that is, all of the subpaths).

Index and AbsoluteIndex return the same value if the segment belongs to the first subpath of the curve.

The AbsoluteIndex property returns a read-only value.

The following code example loops through all of the segments of each subpath and prints the segment’s Index and AbsoluteIndex property in the Intermediate window of the VBA Editor:

Sub Test() 
 Dim s As Shape 
 Dim sp As SubPath 
 Dim seg As Segment 
 Set s = ActiveShape 
 If s.Type = cdrCurveShape Then 
  For Each sp In s.Curve.Subpaths 
   For Each seg In sp.Segments 
    Debug.Print seg.Index, seg.AbsoluteIndex 
   Next seg 
  Next sp 
 End If 
End Sub