PowerPoint VBA教程: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

上页:PowerPoint VBA教程:AnimationPoints集合 下页:PowerPoint VBA教程:Application对象

PowerPoint VBA教程:AnimationSettings对象

PowerPoint VBA教程:Application对象 PowerPoint VBA教程:AutoCorrect对象
PowerPoint VBA教程:Borders集合对象 PowerPoint VBA教程:BulletFormat对象
PowerPoint VBA教程:CalloutFormat对象 PowerPoint VBA教程:Cell对象
PowerPoint VBA教程:CellRange集合对象 PowerPoint VBA教程:ColorEffect对象
PowerPoint VBA教程:ColorFormat对象 PowerPoint VBA教程:ColorScheme对象
PowerPoint VBA教程:ColorSchemes集合对象 PowerPoint VBA教程:Column对象
PowerPoint VBA教程:Columns集合对象 PowerPoint VBA教程:Comment对象
PowerPoint VBA教程:Comments集合 PowerPoint VBA教程:ConnectorFormat对象
PowerPoint VBA教程:DefaultWebOptions对象 PowerPoint VBA教程:Design对象
PowerPoint VBA教程:Designs集合 PowerPoint VBA教程:Diagram对象
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号