Timing.Decelerate-Eigenschaft (PowerPoint)
Legt den Prozentsatz der Dauer fest, über die eine Zeitliche Verzögerung erfolgen soll, oder gibt diesen wert zurück. Lese-/Schreibzugriff.
Syntax
Ausdruck. Decelerate
Ausdruck Eine Variable, die ein Timing-Objekt darstellt.
Rückgabewert
Single
HinwBemerkungeneise
Beispielsweise bedeutet der Wert 0,9, dass die Wiedergabe mit der Standardgeschwindigkeit beginnen und die Verlangsamung nach den ersten 10 % der Animation beginnen soll.
Beispiel
In diesem Beispiel wird einer Folie eine Form und dieser eine Animation hinzugefügt, die mit der Standardgeschwindigkeit startet und nach Ablauf von 70% der Animation verlangsamt wird.
Sub AddShapeSetTiming()
Dim effDiamond As Effect
Dim shpRectangle As Shape
'Adds rectangle 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:=shpRectangle, _
effectId:=msoAnimEffectPathDiamond)
'Slows the effect after seventy percent of the animation has finished
With effDiamond.Timing
.Decelerate = 0.3
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