Shape.GroupItems Property

Syntax

expression.GroupItems

expression A variable that represents a Shape object.

Example

This example adds three triangles to myDocument, groups them, sets a color for the entire group, and then changes the color for the second triangle only.

Visual Basic for Applications

Visual Basic for Applications
`Set myDocument = Worksheets(1) With myDocument.Shapes .AddShape(msoShapeIsoscelesTriangle, _ 10, 10, 100, 100).Name = "shpOne" .AddShape(msoShapeIsoscelesTriangle, _ 150, 10, 100, 100).Name = "shpTwo" .AddShape(msoShapeIsoscelesTriangle, _ 300, 10, 100, 100).Name = "shpThree" With .Range(Array("shpOne", "shpTwo", "shpThree")).Group .Fill.PresetTextured msoTextureBlueTissuePaper .GroupItems(2).Fill.PresetTextured msoTextureGreenMarble End With End With`

Set myDocument = Worksheets(1) With myDocument.Shapes .AddShape(msoShapeIsoscelesTriangle, _ 10, 10, 100, 100).Name = "shpOne" .AddShape(msoShapeIsoscelesTriangle, _ 150, 10, 100, 100).Name = "shpTwo" .AddShape(msoShapeIsoscelesTriangle, _ 300, 10, 100, 100).Name = "shpThree" With .Range(Array("shpOne", "shpTwo", "shpThree")).Group .Fill.PresetTextured msoTextureBlueTissuePaper .GroupItems(2).Fill.PresetTextured msoTextureGreenMarble End With End With

Returns a GroupShapes object that represents the individual shapes in the specified group. Use the Item method of the GroupShapes object to return a single shape from the group. Applies to Shape objects that represent grouped shapes. Read-only.

See also: