Метод ShapeRange. Инкрементротатион (Excel)ShapeRange.IncrementRotation method (Excel)

Изменяет поворот указанной фигуры вокруг оси z на заданное число градусов.Changes the rotation of the specified shape around the z-axis by the specified number of degrees. Используйте свойство вращения , чтобы задать абсолютный поворот фигуры.Use the Rotation property to set the absolute rotation of the shape.

СинтаксисSyntax

Expression. Инкрементротатион (приращение)expression.IncrementRotation (Increment)

Expression (выражение ) Переменная, представляющая объект ShapeRange .expression A variable that represents a ShapeRange object.

ПараметрыParameters

ИмяName Обязательный или необязательныйRequired/Optional Тип данныхData type ОписаниеDescription
Шаг приращенияIncrement ОбязательныйRequired SingleSingle Указывает, насколько далеко фигура вращается горизонтально (в градусах).Specifies how far the shape is to be rotated horizontally, in degrees. Положительное значение поворачивает фигуру по часовой стрелке; отрицательное значение поворачивает его против часовой стрелки.A positive value rotates the shape clockwise; a negative value rotates it counterclockwise.

ПримечанияRemarks

Чтобы повернуть трехмерную форму вокруг оси x или оси y, используйте метод инкрементротатионкс или метод инкрементротатиони .To rotate a three-dimensional shape around the x-axis or the y-axis, use the IncrementRotationX method or the IncrementRotationY method.

ПримерExample

В этом примере показано, как дублировать форму один на мидокумент, задается заполнение дубликата, перемещается на 70 баллов вправо, а 50 — на 30 градусов по часовой стрелке.This example duplicates shape one on myDocument, sets the fill for the duplicate, moves it 70 points to the right and 50 points up, and rotates it 30 degrees clockwise.

Set myDocument = Worksheets(1) 
With myDocument.Shapes(1).Duplicate 
 .Fill.PresetTextured msoTextureGranite 
 .IncrementLeft 70 
 .IncrementTop -50 
 .IncrementRotation 30 
End With

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

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи?Have questions or feedback about Office VBA or this documentation? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.