Returns an Effect object that represents a new animation effect added to a sequence of animation effects.
Dim effAddEffect As Effect Set effAddEffect = ActiveWindow.Selection.SlideRange(1).TimeLine.MainSequence.AddEffect(Shape:=, effectId:=msoAnimEffect3DArrive)
The following arguments are required:
Shape (Shape) - The shape to which the animation effect is added.
effectId (MsoAnimEffect) - The animation effect to be applied.
Here you can find possible values for MsoAnimEffect.
The following arguments are optional
Level (MsoAnimateByLevel) - For charts, diagrams, or text, the level to which the animation effect will be applied. The default value is msoAnimationLevelNone.
Here you can find possible values for MsoAnimateByLevel.
trigger (MsoAnimTriggerType) - The action that triggers the animation effect. The default value is msoAnimTriggerOnPageClick.
Possible Values are
|msoAnimTriggerAfterPrevious||After the Previous button is clicked.|
|msoAnimTriggerNone||No action associated as the trigger.|
|msoAnimTriggerOnPageClick||When a page is clicked.|
|msoAnimTriggerOnShapeClick||When a shape is clicked.|
|msoAnimTriggerWithPrevious||When the Previous button is clicked.|
Index (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).