MsoArrowheadStyle can be one of these MsoArrowheadStyle constants. |
msoArrowheadNone |
msoArrowheadOval |
msoArrowheadStyleMixed |
msoArrowheadDiamond |
msoArrowheadOpen |
msoArrowheadStealth |
msoArrowheadTriangle |
expression.BeginArrowheadStyle
expression Required. An expression that returns one of the objects in the Applies To list.
Example
This example adds a line to myDocument
. There’s a short, narrow oval on the line's starting point and a long, wide triangle on its end point.
Set myDocument = Worksheets(1)
With myDocument.Shapes.AddLine(100, 100, 200, 300).Line
.BeginArrowheadLength = msoArrowheadShort
.BeginArrowheadStyle = msoArrowheadOval
.BeginArrowheadWidth = msoArrowheadNarrow
.EndArrowheadLength = msoArrowheadLong
.EndArrowheadStyle = msoArrowheadTriangle
.EndArrowheadWidth = msoArrowheadWide
End With