expression.RotationY
expression Required. An expression that returns a ThreeDFormat object.
Remarks
To set the rotation of the extruded shape around the x-axis, use the RotationX property of the ThreeDFormat object. To set the rotation of the extruded shape around the z-axis, use the Rotation property of the Shape object. To change the direction of the extrusion's sweep path without rotating the front face of the extrusion, use the SetExtrusionDirection method.
Example
This example adds three identical extruded ovals to myDocument and sets their rotation around the y-axis to – 30, 0, and 30 degrees, respectively.
Set myDocument = ActiveDocument
With myDocument.Shapes
With .AddShape(msoShapeOval, 30, 30, 50, 25).ThreeD
.Visible = True
.RotationY = -30
End With
With .AddShape(msoShapeOval, 30, 70, 50, 25).ThreeD
.Visible = True
.RotationY = 0
End With
With .AddShape(msoShapeOval, 30, 110, 50, 25).ThreeD
.Visible = True
.RotationY = 30
End With
End With