AnimationSettings 对象

Shapes (Shape) AnimationSettings ColorFormat PlaySettings SoundEffect

代表幻灯片放映时应用于指定形状的动画的特殊效果。

使用 AnimationSettings 对象

使用 Shape 对象的 AnimationSettings 属性返回 AnimationSettings 对象。以下示例在当前演示文稿中添加一张幻灯片，其中包含标题和一个三项列表，然后设置该列表由第一级段落激活，从左侧飞入，被制成动画后变暗为指定颜色，并且其中的项目按逆向激活。

Set sObjs = ActivePresentation.Slides.Add(2, ppLayoutText).Shapes
sObjs.Title.TextFrame.TextRange.Text = "Top Three Reasons"
With sObjs.Placeholders(2)
    .TextFrame.TextRange.Text = _
        "Reason 1" & VBNewLine & "Reason 2" & VBNewLine & "Reason 3"
    With .AnimationSettings
        .TextLevelEffect = ppAnimateByFirstLevel
        .EntryEffect = ppEffectFlyFromLeft
        .AfterEffect = ppAfterEffectDim
        .DimColor.RGB = RGB(100, 120, 100)
        .AnimateTextInReverse = True
    End With
End With