Timing.TriggerShape-Eigenschaft (PowerPoint)
Legt fest oder gibt ein Shape -Objekt, das die Auslösen einer Animation zugeordnete Form darstellt. Lese-/Schreibzugriff.
Syntax
Ausdruck. TriggerShape
Ausdruck Eine Variable, die ein Timing-Objekt darstellt.
Rückgabewert
Form
Beispiel
Im folgenden Beispiel werden zu einer Folie zwei Formen hinzugefügt. Dann wird zu einer dieser zwei Formen eine Animation hinzugefügt. Nach dem Klicken auf die andere Form wird die Animation gestartet.
Sub AddShapeSetTiming()
Dim effDiamond As Effect
Dim shpRectangle As Shape
Set shpOval = _
ActivePresentation.Slides(1).Shapes. _
AddShape(Type:=msoShapeOval, Left:=400, Top:=100, Width:=100, Height:=50)
Set shpRectangle = ActivePresentation.Slides(1).Shapes. _
AddShape(Type:=msoShapeRectangle, Left:=100, Top:=100, Width:=50, Height:=50)
Set effDiamond = ActivePresentation.Slides(1).TimeLine. _
InteractiveSequences.Add().AddEffect(Shape:=shpRectangle, _
effectId:=msoAnimEffectPathDiamond, trigger:=msoAnimTriggerOnShapeClick)
With effDiamond.Timing
.Duration = 5
.TriggerShape = shpOval
End With
End Sub
Siehe auch
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.
Feedback
https://aka.ms/ContentUserFeedback.
Bald verfügbar: Im Laufe des Jahres 2024 werden wir GitHub-Issues stufenweise als Feedbackmechanismus für Inhalte abbauen und durch ein neues Feedbacksystem ersetzen. Weitere Informationen finden Sie unterFeedback senden und anzeigen für