Shapes (Shape)![]() ![]() ![]() |
代表线条和箭头的格式。对于线条,LineFormat 对象包含该线条本身的格式信息;对于带有边框的图形,本对象包含该图形的边框的格式信息。
可用 Line 属性返回 LineFormat 对象。下例向 myDocument
添加了蓝色的虚线,并且在该线的起点有短而窄的椭圆,而在该线的终点有长而宽的三角形。
Set myDocument = Worksheets(1)
With myDocument.Shapes.AddLine(100, 100, 200, 300).Line
.DashStyle = msoLineDashDotDot
.ForeColor.RGB = RGB(50, 0, 128)
.BeginArrowheadLength = msoArrowheadShort
.BeginArrowheadStyle = msoArrowheadOval
.BeginArrowheadWidth = msoArrowheadNarrow
.EndArrowheadLength = msoArrowheadLong
.EndArrowheadStyle = msoArrowheadTriangle
.EndArrowheadWidth = msoArrowheadWide
End With