ShapeRange Collection Object
Description
Represents a shape range, which is a set of shapes on a document. A shape range can contain as few as a single shape or as many as all the shapes on the document. You can include whichever shapes you want — chosen from among all the shapes on the document or all the shapes in the selection — to construct a shape range. For example, you could construct a ShapeRange collection that contains the first three shapes on a document, all the selected shapes on a document, or all the freeforms on a document.
Using the ShapeRange Collection
This section describes how to:
- Return a set of shapes you specify by name or index number.
- Return all or some of the selected shapes on a document.
Returning a Set of Shapes You Specify by Name or Index Number
Use Shapes.Range(index), where index is the name or index number of the shape or an array that contains either names or index numbers of shapes, to return a ShapeRange collection that represents a set of shapes on a document. You can use the Array function to construct an array of names or index numbers. The following example sets the fill pattern for shapes one and three on myDocument.
Set myDocument = Worksheets(1)
myDocument.Shapes.Range(Array(1, 3)).Fill.Patterned msoPatternHorizontalBrick
The following example sets the fill pattern for the shapes named "Oval 4" and "Rectangle 5" on myDocument.
Set myDocument = Worksheets(1)
Set myRange = myDocument.Shapes.Range(Array("Oval 4", "Rectangle 5"))
myRange.Fill.Patterned msoPatternHorizontalBrick
Although you can use the Range property to return any number of shapes or slides, it's simpler to use the Item method if you want to return only a single member of the collection. For example, Shapes(1) is simpler than Shapes.Range(1).
Returning All or Some of the Selected Shapes on a Document
Use the ShapeRange property of the Selection object to return all the shapes in the selection. The following example sets the fill foreground color for all the shapes in the selection in window one, assuming that there's at least one shape in the selection.
Windows(1).Selection.ShapeRange.Fill.ForeColor.RGB = RGB(255, 0, 255)
Use Selection.ShapeRange(index), where index is the shape name or the index number, to return a single shape within the selection. The following example sets the fill foreground color for shape two in the collection of selected shapes in window one, assuming that there are at least two shapes in the selection.
Windows(1).Selection.ShapeRange(2).Fill.ForeColor.RGB = RGB(255, 0, 255)
Properties
Adjustments property, Application property, AutoShapeType property, BlackWhiteMode property, Callout property, ConnectionSiteCount property, Connector property, ConnectorFormat property, Count property, Creator property, Fill property, GroupItems property, Height property, HorizontalFlip property, Left property, Line property, LockAspectRatio property, Name property, Nodes property, Parent property, PictureFormat property, Rotation property, Shadow property, TextEffect property, TextFrame property, ThreeD property, Top property, Type property, VerticalFlip property, Vertices property, Visible property, Width property, ZOrderPosition property.
Methods
Align method, Apply method, Delete method, Distribute method, Duplicate method, Flip method, Group method (ShapeRange object), IncrementLeft method, IncrementRotation method, IncrementTop method, Item method (ShapeRange collection), PickUp method, Regroup method, RerouteConnections method, ScaleHeight method, ScaleWidth method, Select method, SetShapesDefaultProperties method, Ungroup method (Shape or ShapeRange object), ZOrder method.