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