Returns a Shapes object that represents all the shapes on the worksheet or chart sheet. Read-only.
For information about returning a single member of a collection, see Returning an Object from a Collection.
Example
This example adds a blue dashed line to worksheet one.
With Worksheets(1).Shapes.AddLine(10, 10, 250, 250).Line
.DashStyle = msoLineDashDotDot
.ForeColor.RGB = RGB(50, 0, 128)
End With