通过

PowerPoint) (EffectParameters 属性

  • 项目

返回一个代表动画效果属性的 EffectParameters 对象。

语法

expression。 EffectParameters

表达 一个代表 Effect 对象的变量。

返回值

EffectParameters

示例

本示例向第一张幻灯片的主动画序列添加效果。 该效果将第一个形状的字体更改为 Broadway。

Sub ChangeFontName()

    Dim shpText As Shape
    Dim effNew As Effect

    Set shpText = ActivePresentation.Slides(1).Shapes(1)

    Set effNew = ActivePresentation.Slides(1).TimeLine.MainSequence _
        .AddEffect(Shape:=shpText, EffectId:=msoAnimEffectChangeFont)

    effNew.EffectParameters.FontName = "Broadway"

End Sub

另请参阅

影响对象

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。