PowerPoint VBA教程:IncrementRotationX方法

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

expression.IncrementRotationX(Increment)

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

Increment  必选。Single 类型。指定形状绕 X 轴旋转改变的度数。可为 - 90 到 90 之间的值。正值向上旋转,负值向下旋转。

说明

调整指定形状绕 x 轴的旋转不能超过 RotationX属性的上、下限(90 度到 -90度)。例如,如果 RotationX属性最初设为 80 并指定 Increment参数为 40,则旋转结果为 90(RotationX属性的上限),而不是 120。

若要改变形状绕 y 轴的旋转量,请使用IncrementRotationY方法。若要改变绕 z 轴的旋转量,请使用IncrementRotation方法。

VBA示例

本示例将myDocument 上第一个形状向上倾斜 10 度。此形状必须是挤制形状,以便看到代码的效果。


Set myDocument = ActivePresentation.Slides(1)
myDocument.Shapes(1).ThreeD.IncrementRotationX 10

上页:PowerPoint VBA教程:IncrementRotation方法 下页:PowerPoint VBA教程:IncrementRotationY方法

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方法 PowerPoint VBA教程:MoveTo方法
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号