Skip to content

Latest commit

 

History

History
49 lines (34 loc) · 1.45 KB

Excel.ShapeRange.GroupItems.md

File metadata and controls

49 lines (34 loc) · 1.45 KB
title keywords f1_keywords api_name ms.assetid ms.date ms.localizationpriority
ShapeRange.GroupItems property (Excel)
vbaxl10.chm640104
vbaxl10.chm640104
Excel.ShapeRange.GroupItems
daf6d12c-409a-cf0a-989f-319333d24596
05/14/2019
medium

ShapeRange.GroupItems property (Excel)

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 ShapeRange objects that represent grouped shapes. Read-only.

Syntax

expression.GroupItems

expression A variable that represents a ShapeRange 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.

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

[!includeSupport and feedback]