EndArrowheadStyle Property

MsoArrowheadStyle

MsoArrowheadStyle can be one of these MsoArrowheadStyle constants.
msoArrowheadNone
msoArrowheadOval
msoArrowheadStyleMixed
msoArrowheadDiamond
msoArrowheadOpen
msoArrowheadStealth
msoArrowheadTriangle

expression.EndArrowheadStyle

expression Required. An expression that returns one of the objects in the Applies To list.

Example

This example adds a line to the active document. There's a short, narrow oval on the line's starting point and a long, wide triangle on its end point.

Dim docActive As Document

Set docActive = ActiveDocument

With docActive.Shapes.AddLine(100, 100, 200, 300).Line
    .BeginArrowheadLength = msoArrowheadShort
    .BeginArrowheadStyle = msoArrowheadOval
    .BeginArrowheadWidth = msoArrowheadNarrow
    .EndArrowheadLength = msoArrowheadLong
    .EndArrowheadStyle = msoArrowheadTriangle
    .EndArrowheadWidth = msoArrowheadWide
End With

Applies to | LineFormat Object