SelectAll Method

Selects all the shapes in the specified CanvasShapes, DiagramNodeChildren, DiagramNodes, or Shapes collection.

expression   Required. An expression that returns one of the objects in the Applies To list.

Example

This example selects all the shapes on myDocument and creates a ShapeRange collection containing all the shapes.

Set myDocument = Worksheets(1)
myDocument.Shapes.SelectAll

Set sr = Selection.ShapeRange