Propriété TimeLine.InteractiveSequences (PowerPoint)

Renvoie un objet Sequences qui représente les animations déclenchées par un clic sur une forme spécifiée.

Syntaxe

expression. InteractiveSequences

expression Variable qui représente un objet TimeLine .

Valeur renvoyée

Séquences

Remarques

La valeur par défaut de la propriété InteractiveSequences est une collection Sequences vide.

Exemple

L’exemple suivant montre comment ajouter une séquence interactive à la première diapositive et définir les propriétés des effets de texte pour cette nouvelle séquence d’animation.

Sub NewInteractiveSequence()

    Dim seqInteractive As Sequence
    Dim shpText As Shape
    Dim effText As Effect

    Set seqInteractive = ActivePresentation.Slides(1).TimeLine _
        .InteractiveSequences.Add(1)

    Set shpText = ActivePresentation.Slides(1).Shapes(1)
    Set effText = ActivePresentation.Slides(1).TimeLine _
        .MainSequence.AddEffect(Shape:=shpText, _
        EffectId:=msoAnimEffectChangeFont, _
        Trigger:=msoAnimTriggerOnPageClick)

    effText.EffectParameters.FontName = "Broadway"
    seqInteractive.ConvertToTextUnitEffect Effect:=effText, _
        UnitEffect:=msoAnimTextUnitEffectByWord

End Sub

Voir aussi

Objet TimeLine

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.