Свойство ThreeDFormat.RotationX (Publisher)
Возвращает или задает поворот выдавленной фигуры вокруг оси X в градусах. Может быть значением от -90 до 90. Положительное значение указывает на поворот вверх; отрицательное значение указывает на поворот вниз. Для чтения и записи, Single.
Синтаксис
expression. RotationX
Выражение Переменная, представляющая объект ThreeDFormat .
Возвращаемое значение
Одинарное
Замечания
Чтобы задать поворот экструдированного фигуры вокруг оси Y, используйте свойство RotationY .
Чтобы задать поворот выдавленной фигуры вокруг оси Z, используйте свойство Поворот объекта Shape .
Чтобы изменить направление пути очистки экструзии без поворота передней стороны экструзии, используйте метод SetExtrusionDirection .
Пример
В этом примере к активному документу добавляются три идентичных экструдированных овала и устанавливается их поворот вокруг оси X на -30, 0 и 30 градусов соответственно.
Sub SetRotationX()
With ActiveDocument.Pages(1).Shapes
With .AddShape(Type:=msoShapeOval, Left:=30, _
Top:=60, Width:=50, Height:=25).ThreeD
.Visible = True
.RotationX = -30
End With
With .AddShape(Type:=msoShapeOval, Left:=90, _
Top:=60, Width:=50, Height:=25).ThreeD
.Visible = True
.RotationX = 0
End With
With .AddShape(Type:=msoShapeOval, Left:=150, _
Top:=60, Width:=50, Height:=25).ThreeD
.Visible = True
.RotationX = 30
End With
End With
End Sub
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.