Node.BreakApart

Sub BreakApart()

Member of Node

The BreakApart method breaks a subpath at the specified node.

The following VBA example breaks the curve into individual segments.

Sub Test()

Dim s As Shape

Dim i As Long

Set s = ActiveShape

If s.Type <> cdrCurveShape Then s.ConvertToCurves

s.Curve.Closed = False

For i = s.Curve.Nodes.Count To 1 Step -1

s.Curve.Nodes(i).BreakApart

Next i

s.BreakApart

End Sub