Partager via


Propriété Timing.TriggerType (PowerPoint)

Représente le déclencheur qui démarre une animation. Lecture-écriture.

Syntaxe

expression. TriggerType

Expression Variable qui représente un objet Timing .

Valeur renvoyée

MsoAnimTriggerType

Remarques

La valeur de la propriété TriggerType peut être l’une de ces constantes MsoAnimTriggerType. La valeur par défaut est msoAnimTriggerOnPageClick.

msoAnimTriggerAfterPrevious
msoAnimTriggerMixed
msoAnimTriggerNone
msoAnimTriggerOnPageClick
msoAnimTriggerOnShapeClick
msoAnimTriggerWithPrevious

Exemple

L’exemple suivant montre comment ajouter une forme à une diapositive, lui attribuer une animation et commencer l’animation trois secondes après que l’utilisateur a cliqué sur la forme.

Sub AddShapeSetTiming() 
 
    Dim effDiamond As Effect 
    Dim shpRectangle As Shape 
 
    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:=shpRectangle, effectId:=msoAnimEffectPathDiamond) 
 
    With effDiamond.Timing 
        .Duration = 5 
        .TriggerType = msoAnimTriggerWithPrevious
        .TriggerDelayTime = 3 
    End With 
 
End Sub

Voir aussi

Objet Minutage

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.