Метод ShapeRange.Group (PowerPoint)

Статья
04/07/2023

Группирует фигуры в указанном диапазоне. Возвращает сгруппированные фигуры в виде одного объекта Shape .

Синтаксис

expression. Группы

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

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

Shape

Примечания

Так как группа фигур обрабатывается как одна фигура, группирование и разгруппирование фигур изменяет количество элементов в коллекции Фигуры и изменяет число индексов элементов, которые поступают после затронутых элементов в коллекции.

Пример

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

Set myDocument = ActivePresentation.Slides(1)

With myDocument.Shapes

    .AddShape(msoShapeCan, 50, 10, 100, 200).Name = "shpOne"

    .AddShape(msoShapeCube, 150, 250, 100, 200).Name = "shpTwo"

    With .Range(Array("shpOne", "shpTwo")).Group

        .Fill.PresetTextured msoTextureBlueTissuePaper

        .Rotation = 45

        .ZOrder msoSendToBack

    End With

End With

См. также

Объект ShapeRange

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

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