Propriété SlideShowTransition.Duration (PowerPoint)

Renvoie ou définit la longueur d’une animation en secondes. Lecture-écriture.

Syntaxe

expression. Duration

Expression Variable qui représente un objet Timing .

Valeur renvoyée

Unique

Exemple

L’exemple suivant montre comment ajouter une forme et lui attribuer une animation, puis comment définir la durée de l’animation.

Sub AddShapeSetTiming()

    Dim effDiamond As Effect
    Dim shpRectangle As Shape

    'Adds shape and sets animation effect
    Set shpRectangle = ActivePresentation.Slides(1).Shapes _
        .AddShape(Type:=msoShapeRectangle, Left:=100, _
        Top:=100, Width:=50, Height:=50)

    Set effDiamond = ActivePresentation.Slides(1).TimeLine.MainSequence _
       .AddEffect(Shape:=sh, effectId:=msoAnimEffectPathDiamond)

    'Sets duration of effect
    effDiamond.Timing.Duration = 5

End Sub

Voir aussi

Objet MinutageSlideShowTransition, 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.