Объект AnimationSettings (PowerPoint)
Представляет специальные эффекты, применяемые к анимации для указанной фигуры во время слайд-шоу.
Пример
Используйте свойство AnimationSettingsобъекта Shape , чтобы вернуть объект AnimationSettings . В следующем примере слайд, содержащий как заголовок, так и список из трех элементов, добавляется в активную презентацию, а затем он задает список для анимации абзацами первого уровня, для перехода слева при анимации, для тускнего до заданного цвета после анимации и анимации его элементов в обратном порядке.
Set sObjs = ActivePresentation.Slides.Add(2, ppLayoutText).Shapes
sObjs.Title.TextFrame.TextRange.Text = "Top Three Reasons"
With sObjs.Placeholders(2)
.TextFrame.TextRange.Text = _
"Reason 1" & VBNewLine & "Reason 2" & VBNewLine & "Reason 3"
With .AnimationSettings
.TextLevelEffect = ppAnimateByFirstLevel
.EntryEffect = ppEffectFlyFromLeft
.AfterEffect = ppAfterEffectDim
.DimColor.RGB = RGB(100, 120, 100)
.AnimateTextInReverse = True
End With
End With
Свойства
См. также
Справочник по объектной модели PowerPoint
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.