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


Метод ShapeRange.IncrementTop (PowerPoint)

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

Синтаксис

expression. IncrementTop (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 и обратная связь.