Returns an AnimationSettings object that represents all the special effects you can apply to the animation of the specified shape.
expression Required. An expression that returns one of the objects in the Applies To list.
This example sets shape one on slide two in the active presentation to fly in from the left when the slide is built.
With ActivePresentation.Slides(2).Shapes(1).AnimationSettings .EntryEffect = ppEffectFlyFromLeft .TextLevelEffect = ppAnimateByAllLevels End With