Amount 属性

返回或设置 Single 变量，它代表具有动画效果的形状绕 Z 轴旋转的度数。正值表示顺时针旋转；负值表示逆时针旋转。可读写。

expression  必选。该表达式返回“应用于”列表中的对象之一。

示例

以下示例添加了一个形状，并且给该形状添加了一个旋转 90 度的动画。

Sub SetAnimEffect()

    Dim effSpin As Effect
    Dim shpCube As Shape

    Set shpCube = ActivePresentation.Slides(1).Shapes.AddShape _
        (Type:=msoShapeCube, Left:=100, Top:=100, _
        Width:=50, Height:=50)
    Set effSpin = ActivePresentation.Slides(1).TimeLine _
        .MainSequence.AddEffect(Shape:=shpCube, _
        effectId:=msoAnimEffectSpin)

    effSpin.Timing.Duration = 3
    effSpin.EffectParameters.Amount = -90

End Sub