Метод ShapeRange.IncrementLeft (PowerPoint)

Статья
04/07/2023

Перемещает указанный диапазон фигур по горизонтали на указанное количество точек.

Синтаксис

выражение. IncrementLeft( _Increment_ )

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

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
Приращение	Обязательный	Single	Указывает, как далеко должен перемещаться диапазон фигур по горизонтали в точках. Положительное значение перемещает диапазон фигур вправо; отрицательное значение перемещает его влево.

Пример

В этом примере дублируется фигура в myDocument, задает заливку для дубликата, перемещает ее на 70 точек вправо и на 50 точек вверх и поворачивает на 30 градусов по часовой стрелке.

Set myDocument = ActivePresentation.Slides(1)

With myDocument.Shapes(1).Duplicate

    .Fill.PresetTextured msoTextureGranite

    .IncrementLeft 70

    .IncrementTop -50

    .IncrementRotation 30

End With

См. также

Объект ShapeRange

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

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

Поделиться через