Свойство AnimationSettings.TextUnitEffect (PowerPoint)
Указывает, является ли текст в указанной фигуре анимированным абзацем, словом за словом или буквой. Для чтения и записи.
Синтаксис
выражение. TextUnitEffect
Выражение Переменная, представляющая объект AnimationSettings .
Возвращаемое значение
PpTextUnitEffect
Замечания
Значение свойства TextUnitEffect может быть одной из этих констант PpTextUnitEffect .
ppAnimateByCharacter |
ppAnimateByParagraph |
ppAnimateByWord |
ppAnimateUnitMixed |
Чтобы свойство TextUnitEffect ввело в силу, свойство TextLevelEffect для указанной фигуры должно иметь значение, отличное от ppAnimateLevelNone или ppAnimateByAllLevels, а свойство Animate должно иметь значение True.
Пример
В этом примере к активной презентации добавляется слайд заголовка и текст заголовка, а заголовок создается по буквам.
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
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.