Shapes 属性

       

返回 Shapes 对象,该对象代表工作表或图形工作表上的所有图形。只读。

有关返回集合中单个成员的详细信息,请参阅返回集合中的对象

示例

本示例向第一张工作表中添加兰色的虚线。

With Worksheets(1).Shapes.AddLine(10, 10, 250, 250).Line
    .DashStyle = msoLineDashDotDot
    .ForeColor.RGB = RGB(50, 0, 128)
End With