PowerPoint VBA教程:IncrementRotation方法

以指定度数改变指定形状绕z 轴的旋转量。使用Rotation属性设置形状的绝对旋转量。

expression.IncrementRotation(Increment)

expression  必选。该表达式返回一个 Shape对象。

Increment  必选。Single 类型。指定形状水平旋转的度数。正值将形状顺时针旋转,负值将形状逆时针旋转。

说明

若要绕 X 轴或 Y 轴旋转一个三维形状,请使用IncrementRotationX方法或IncrementRotationY方法。

VBA示例

本示例复制myDocument 上的第一个形状,并设置复制的填充,再向右移 70 磅、向上移 50 磅,然后顺时针旋转 30 度角。


Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes(1).Duplicate
    .Fill.PresetTextured msoTextureGranite
    .IncrementLeft 70
    .IncrementTop -50
    .IncrementRotation 30
End With

上页:PowerPoint VBA教程:IncrementOffsetY方法 下页:PowerPoint VBA教程:IncrementRotationX方法

PowerPoint VBA教程:IncrementRotation方法

PowerPoint VBA教程:IncrementRotationX方法 PowerPoint VBA教程:IncrementRotationY方法
PowerPoint VBA教程:IncrementTop方法 PowerPoint VBA教程:Insert方法
PowerPoint VBA教程:InsertAfter方法 PowerPoint VBA教程:InsertBefore方法
PowerPoint VBA教程:InsertDateTime方法 PowerPoint VBA教程:InsertFromFile方法
PowerPoint VBA教程:InsertSlideNumber方法 PowerPoint VBA教程:InsertSymbol方法
PowerPoint VBA教程:Item方法 PowerPoint VBA教程:LargeScroll方法
PowerPoint VBA教程:Last方法 PowerPoint VBA教程:Lines方法
PowerPoint VBA教程:Load方法 PowerPoint VBA教程:LtrRun方法
PowerPoint VBA教程:Merge方法 PowerPoint VBA教程:MoveAfter方法
PowerPoint VBA教程:MoveBefore方法 PowerPoint VBA教程:MoveNode方法
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号