ScaleEffect.ToX-Eigenschaft (PowerPoint)

Artikel
09/17/2024

Legt fest oder gibt einen einzelnen, die die Endzeichenposition Breite des ein ScaleEffect -Objekt, das als Prozentsatz der Bildschirmbreite angegeben darstellt. Lese-/Schreibzugriff.

Syntax

Ausdruck. ToX

Ausdruck Eine Variable, die ein ScaleEffect-Objekt darstellt.

Rückgabewert

Einzel

Hinweise

Der Standardwert dieser Eigenschaft ist leer, in dem die aktuelle Position des Objekts verwendet wird.

Verwenden Sie diese Eigenschaft in Verbindung mit der Eigenschaft FromX zur Größenänderung oder von einer Position an eine andere zu springen.

Verwechseln Sie diese Eigenschaft mit der um -Eigenschaft der ColorEffect, RotationEffect- oder PropertyEffect -Objekte, die verwendet wird, um festzulegen, oder ändern Sie Farben, Drehungen oder andere Eigenschaften eines Animationsverhaltens nicht.

Beispiel

Im folgenden Beispiel wird ein Animationspfad hinzugefügt. Außerdem wird die horizontale und vertikale Start- und Endposition festgelegt.

Sub AddMotionPath()

    Dim effCustom As Effect
    Dim animMotion As AnimationBehavior
    Dim shpRectangle As Shape

    'Adds shape and sets effect and animation properties

    Set shpRectangle = ActivePresentation.Slides(1).Shapes _
        .AddShape(Type:=msoShapeRectangle, Left:=100, _
        Top:=100, Width:=50, Height:=50)

    Set effCustom = ActivePresentation.Slides(1).TimeLine.MainSequence _
        .AddEffect(Shape:=shpRectangle, effectId:=msoAnimEffectCustom)

    Set animMotion = effCustom.Behaviors.Add(msoAnimTypeMotion)

    'Sets starting and ending horizontal and vertical positions
    With animMotion.MotionEffect
        .FromX = 0
        .FromY = 0
        .ToX = 50
        .ToY = 50
    End With

End Sub

Siehe auch

ScaleEffect-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