Outline.EndArrow

Property EndArrow As ArrowHead

Member of Outline

The EndArrow property represents the ending arrowhead of an outline.

The following VBA example applies the fifth arrowhead to the ending point of the selected curve.

Sub Test()

Dim s As Shape

Set s = ActiveShape

If s Is Nothing Then

MsgBox "Nothing is selected."

Exit Sub

End If

If s.Outline.Type = cdrOutline Then

s.Outline.EndArrow = ArrowHeads(5)

End If

End Sub

Sub Test()

Dim s As Shape

For Each s In ActivePage.Shapes

If s.Outline.Type = cdrOutline Then

s.Outline.StartArrow = Nothing

s.Outline.EndArrow = Nothing

End If

End Sub