Sequence Collection

Represents a collection of Effect objects for a slide's interactive animation sequences. The Sequence collection is a member of the Sequences collection.

Using the Sequence collection

Use the MainSequence property of the TimeLine object to return a Sequence object.

Use the AddEffect method to add a new Sequence object. This example adds a shape and an animation sequence to the first shape on the first slide in the active presentation.

Sub NewEffect()
    Dim effNew As Effect
    Dim shpFirst As Shape

    Set shpFirst = ActivePresentation.Slides(1).Shapes(1)
    Set effNew = ActivePresentation.Slides(1).TimeLine.MainSequence.AddEffect _
        (Shape:=shpFirst, effectId:=msoAnimEffectBlinds)
End Sub