PowerPoint VBA教程:TextUnitEffect属性

应用于 AnimationSettings对象的 TextUnitEffect属性。

返回或设置PpTextUnitEffect 类型常数,该常数代表指定形状中的文本是按段落、按字或按字母动画显示。可读写。

PpTextUnitEffect 可以是下列 PpTextUnitEffect 类型常数之一。
ppAnimateByCharacter
ppAnimateByParagraph
ppAnimateByWord
ppAnimateUnitMixed

expression.TextUnitEffect

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

说明

若要使 TextUnitEffect属性设置生效,则指定形状的TextLevelEffect属性必须设为非 ppAnimateLevelNone 或 ppAnimateByAllLevels 的值,并且Animate属性必须设为 True。

应用于EffectInformation对象的 TextUnitEffect属性。

返回MsoAnimTextUnitEffect 类型常数,该常数代表指定形状中的文本是按段落、按字或按字母动画显示。只读。

MsoAnimTextUnitEffect 可以是下列 MsoAnimTextUnitEffect 类型常数之一。
msoAnimTextUnitEffectByCharacter
msoAnimTextUnitEffectByParagraph
msoAnimTextUnitEffectByWord
msoAnimTextUnitEffectMixed

expression.TextUnitEffect

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

VBA示例

应用于 AnimationSettings对象。

本示例在当前演示文稿中添加一个标题幻灯片和标题文本,并设置该标题按字母创建。


With ActivePresentation.Slides.Add(Index:=1, _
    Layout:=ppLayoutTitleOnly).Shapes(1)
    .TextFrame.TextRange.Text = "Sample title"
    With .AnimationSettings
        .Animate = True
        .TextLevelEffect = ppAnimateByFirstLevel
        .TextUnitEffect = ppAnimateByCharacter
        .EntryEffect = ppEffectFlyFromLeft
    End With
End With

上页:PowerPoint VBA教程:TextToDisplay属性 下页:PowerPoint VBA教程:TextureName属性

PowerPoint VBA教程:TextUnitEffect属性

版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号