ShapeRange.Rotation Property (PowerPoint)
Returns or sets the number of degrees the specified shape is rotated around the z-axis. Read/write.
Syntax
expression .Rotation
expression A variable that represents a ShapeRange object.
Return Value
Single
Remarks
A positive value indicates clockwise rotation; a negative value indicates counterclockwise rotation.
To set the rotation of a three-dimensional shape around the x-axis or the y-axis, use the RotationX property or the RotationY property of the ThreeDFormat object.
Example
This example matches the rotation of all shapes on myDocument to the rotation of shape one.
Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes
sh1Rotation = .Item(1).Rotation
For o = 1 To .Count
.Item(o).Rotation = sh1Rotation
Next
End With