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
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.