Свойство ShapeRange.GroupItems (PowerPoint)

Статья
04/07/2023

Возвращает объект GroupShapes , представляющий отдельные фигуры в указанной группе. Используйте метод Item объекта GroupShapes , чтобы вернуть одну фигуру из группы. Только для чтения.

Синтаксис

выражение. GroupItems

Выражение Переменная, представляющая объект ShapeRange .

Возвращаемое значение

GroupShapes

Пример

В этом примере три треугольника добавляются в myDocument, группирует их, задает цвет для всей группы, а затем изменяет цвет только для второго треугольника.

Set myDocument = ActivePresentation.Slides(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

См. также

Объект ShapeRange

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.

Share via