Méthode Sequence.FindFirstAnimationFor (PowerPoint)

Article
04/07/2023

Renvoie un objet Effect qui représente la première animation d’une forme donnée.

Syntaxe

expression. FindFirstAnimationFor( _Shape_ )

Expression Variable qui représente un objet Sequence .

Parameters

Nom	Requis/Facultatif	Type de données	Description
Forme	Requis	Shape	Forme pour laquelle il faut rechercher la première animation.

Valeur renvoyée

Effet

Exemple

L’exemple suivant recherche et supprime la première animation de la première forme dans la première diapositive. Cet exemple présuppose l’existence d’au moins une animation pour la forme spécifiée.

Sub FindFirstAnimation()

    Dim sldFirst As Slide
    Dim shpFirst As Shape
    Dim effFirst As Effect

    Set sldFirst = ActivePresentation.Slides(1)
    Set shpFirst = sldFirst.Shapes(1)

    Set effFirst = sldFirst.TimeLine.MainSequence _
        .FindFirstAnimationFor(Shape:=shpFirst)

    effFirst.Delete

End Sub

Voir aussi

Sequence, objet

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.