Teilen über


SlideShowTransition.Duration-Eigenschaft (PowerPoint)

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.