Represents a collection of objects. Use a Sequence object to add, find, modify, and clone animation effects.

Example

Use the property of the object to return a Sequences collection. Use the method to add an interactive animation sequence. The following example adds two shapes on the first slide of the active presentation and sets interactive effect for the star shape so that when you click the bevel shape, the star shape is be animated.

Visual Basic for Applications 
Sub AddNewSequence() Dim shp1 As Shape Dim shp2 As Shape Dim interEffect As Effect Set shp1 = ActivePresentation.Slides(1).Shapes.AddShape _ (Type:=msoShape32pointStar, Left:=100, _ Top:=100, Width:=200, Height:=200) Set shp2 = ActivePresentation.Slides(1).Shapes.AddShape _ (Type:=msoShapeBevel, Left:=400, _ Top:=200, Width:=150, Height:=100) With ActivePresentation.Slides(1).TimeLine.InteractiveSequences.Add(1) Set interEffect = .AddEffect(shp2, msoAnimEffectBlinds, _ trigger:=msoAnimTriggerOnShapeClick) interEffect.Shape = shp1 End With End Sub

See also: