Объект GroupShapes (Excel)
Представляет отдельные фигуры в сгруппированных фигурах.
Замечания
Каждая фигура представлена объектом Shape . С помощью метода Item с этим объектом можно работать с отдельными фигурами в группе без необходимости их разгруппировки.
Пример
Используйте свойство GroupItems объекта Shape , чтобы вернуть коллекцию GroupShapes .
Используйте GroupItems (index), где индекс — это количество отдельных фигур в сгруппированных фигурах, чтобы вернуть одну фигуру из коллекции GroupShapes .
В следующем примере три треугольника добавляются в myDocument, группирует их, задает цвет для всей группы, а затем изменяет цвет только для второго треугольника.
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
Методы
Свойства
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.