Share via


Sequences Interface

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

Namespace:  Microsoft.Office.Interop.PowerPoint
Assembly:  Microsoft.Office.Interop.PowerPoint (in Microsoft.Office.Interop.PowerPoint.dll)

Syntax

'Declaration
<GuidAttribute("914934DD-5A91-11CF-8700-00AA0060263B")> _
Public Interface Sequences _
    Inherits Collection
'Usage
Dim instance As Sequences
[GuidAttribute("914934DD-5A91-11CF-8700-00AA0060263B")]
public interface Sequences : Collection

Examples

Use the InteractiveSequences property of the TimeLine object to return a Sequences collection. Use the Add(Int32) 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.

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

Reference

Sequences Members

Microsoft.Office.Interop.PowerPoint Namespace