The All method returns a or sets a shape range that contains all the shapes from a Shapes collection.
Examples:
The following VBA example selects all the shapes in the Shapes collection by using the All method, and it then applies a two-pattern fill to the shapes.
Sub ShapesAll()
ActiveLayer.Shapes.All.ApplyPatternFill cdrTwoColorPattern
End Sub