TextUnitEffect Property
Applies To
AnimationSettings object.
Description
Returns or sets a value that indicates whether the text in the specified shape is animated paragraph by paragraph, word by word, or letter by letter. Can be one of the following TextUnitEffect values: ppAnimateByCharacter, ppAnimateByParagraph, ppAnimateByWord, or ppAnimateUnitMixed. Read/write Long.
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.
Example
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(1, ppLayoutTitleOnly).Shapes(1)
.TextFrame.TextRange.Text = "Sample title"
With .AnimationSettings
.Animate = True
.TextLevelEffect = ppAnimateByFirstLevel
.TextUnitEffect = ppAnimateByCharacter
.EntryEffect = ppEffectFlyFromLeft
End With
End With