Publisher) (Shape.Rotation 屬性

傳回或設定 Single ，代表指定圖形繞 z 軸旋轉的角度數。 正值代表順時針旋轉 ；為負值表示逆時針旋轉角度。 讀取/寫入。

語法

運算式。旋轉

expression 一個用於表示 Shape 物件的變數。

註解

若要設定立體圖形繞 x 軸或 y 軸的旋轉，請使用 RotationX 屬性或 ThreeDFormat 物件的 RotationY 屬性。

範例

本範例將使用中出版物第一頁的所有圖案合配第一個圖案的旋轉。 此範例假設使用中出版物的第一頁上至少有兩個圖形。

Sub SetShapeRotation() 
 Dim sngRotation As Single 
 Dim intCount As Integer 
 With ActiveDocument.Pages(1).Shapes 
 sngRotation = .Item(1).Rotation 
 For intCount = 1 To .Count 
 .Item(intCount).Rotation = sngRotation 
 Next intCount 
 End With 
End Sub

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。