以指定的度数为增量,更改指定的图形绕 z 轴的转角。使用 Rotation 属性可设置图形的绝对转角。
expression.IncrementRotation(Increment)
expression 必需。该表达式返回“应用于”列表中的对象之一。
Increment Single 类型,必需。以度为单位指定图形在水平方向的旋转量。正值使图形按顺时针方向旋转,负值使图形按逆时针方向旋转。
若要使三维图形绕 x 轴或 y 轴旋转,请使用 IncrementRotationX 方法或 IncrementRotationY 方法。
本示例复制 myDocument
上的第一个图形,设置所复制的图形的填充格式,将其向右移动 70 磅,向上移动 50 磅,然后按顺时针方向旋转 30 度。
Set myDocument = Worksheets(1)
With myDocument.Shapes(1).Duplicate
.Fill.PresetTextured msoTextureGranite
.IncrementLeft 70
.IncrementTop -50
.IncrementRotation 30
End With