Effect.MoveTo-Methode (PowerPoint)

Artikel
04/07/2023

Verschiebt das angegebene Objekt an eine bestimmte Position in der Auflistung. Alle anderen Elemente in der Auflistung werden entsprechend neu nummeriert.

Syntax

Ausdruck. MoveTo( _toPos_ )

Ausdruck Eine Variable, die ein Effect-Objekt darstellt.

Parameter

Name	Erforderlich/Optional	Datentyp	Beschreibung
Topos	Erforderlich	Long	Die Indexposition, an die der Animationseffekt verschoben werden soll.

Beispiel

In diesem Beispiel wird ein Animationseffekt in der Auflistung der Animationseffekte für die angegebene Form an die zweite Position verschoben.

Sub MoveEffect()

    Dim sldFirst as Slide
    Dim shpFirst As Shape
    Dim effAdd As Effect

    Set sldFirst = ActivePresentation.Slides(1)
    Set shpFirst = sldFirst.Shapes(1)
    Set effAdd = sldFirst.TimeLine.MainSequence.AddEffect _
        (Shape:=shpFirst, effectId:=msoAnimEffectBlinds)

    effAdd.MoveTo toPos:=2

End Sub

In diesem Beispiel wird die zweite Folie in der aktiven Präsentation an die Position der ersten Folie verschoben.

Sub MoveSlideToNewLocation()
    ActivePresentation.Slides(2).MoveTo toPos:=1
End Sub

Siehe auch

Effect-Objekt

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.

Freigeben über