Returns or sets a PpTextUnitEffect constant that indicates whether the text in the specified shape is animated paragraph by paragraph, word by word, or letter by letter. Read/write.
PpTextUnitEffect can be one of thesePpTextUnitEffect constants. |
ppAnimateByCharacter |
ppAnimateByParagraph |
ppAnimateByWord |
ppAnimateUnitMixed |
expression.TextUnitEffect
expression Required. An expression that returns an AnimationSettings object.
Remarks
For the TextUnitEffect property setting to take effect, the TextLevelEffect property for the specified shape must have a value other than ppAnimateLevelNone or ppAnimateByAllLevels, and the Animate property must be set to True.
TextUnitEffect property as it applies to the EffectInformation object.
Returns an MsoAnimTextUnitEffect constant that indicates whether the text in the specified shape is animated paragraph by paragraph, word by word, or letter by letter. Read-only.
MsoAnimTextUnitEffect can be one of these MsoAnimTextUnitEffect constants. |
msoAnimTextUnitEffectByCharacter |
msoAnimTextUnitEffectByParagraph |
msoAnimTextUnitEffectByWord |
msoAnimTextUnitEffectMixed |
expression.TextUnitEffect
expression Required. An expression that returns an EffectInformation object.
Example
As it applies to the AnimationSettings object.
This example adds a title slide and title text to the active presentation and sets the title to be built letter by letter.
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