Anmerkung
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Gibt die Dauer einer Animation in Sekunden zurück oder legt sie fest. Lese-/Schreibzugriff.
Syntax
Ausdruck. Duration
Ausdruck Eine Variable, die ein Timing-Objekt darstellt.
Rückgabewert
Einzel
Beispiel
Im folgenden Beispiel wird eine Form und dieser eine Animation hinzugefügt. Anschließend wird die Animationsdauer festgelegt.
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
Siehe auch
SlideShowTransition-Objekt des Timing-Objekts
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.