Range.ShapeRange Property (Word)
Returns a ShapeRange collection that represents all the Shape objects in the specified range. Read-only.
A variable that represents a Range object.
A shape range can contain drawings, shapes, pictures, OLE objects, ActiveX controls, text objects, and callouts.
The following example sets the fill foreground color to purple for all the shapes in the active document.
ActiveDocument.Content.ShapeRange.Fill.ForeColor.RGB = _
RGB(255, 0, 255)