Sequence.AddEffect Method (PowerPoint)
Returns an Effect object that represents a new animation effect added to a sequence of animation effects.
Syntax
expression .AddEffect(Shape, effectId, Level, trigger, Index)
expression A variable that represents a Sequence object.
Parameters
Name |
Required/Optional |
Data Type |
Description |
|---|---|---|---|
Shape |
Required |
The shape to which the animation effect is added. |
|
effectId |
Required |
The animation effect to be applied. |
|
Level |
Optional |
For charts, diagrams, or text, the level to which the animation effect will be applied. The default value is msoAnimationLevelNone. |
|
trigger |
Optional |
The action that triggers the animation effect. The default value is msoAnimTriggerOnPageClick. |
|
Index |
Optional |
Long |
The position at which the effect will be placed in the collection of animation effects. The default value is -1 (added to the end). |
Return Value
Effect
Example
The following example adds a bouncing animation to the first shape range on the first slide. This example assumes a shape range containing one or more shapes is selected on the first slide.
Sub AddBouncingAnimation()
Dim sldActive As Slide
Dim shpSelected As Shape
Set sldActive = ActiveWindow.Selection.SlideRange(1)
Set shpSelected = ActiveWindow.Selection.ShapeRange(1)
' Add a bouncing animation.
sldActive.TimeLine.MainSequence.AddEffect _
Shape:=shpSelected, effectId:=msoAnimEffectBounce
End Sub