ScaleEffect.ByX-Eigenschaft (PowerPoint)

Artikel
04/07/2023

Legt fest oder gibt einen Single-Wert zurück, der das horizontale Skalieren oder Verschieben eines Objekts um einen angegebenen Prozentsatz der Bildschirmbreite darstellt, je nachdem, ob es in Verbindung mit einem ScaleEffect - oder MotionEffect-Objekt verwendet wird. Ein Wert von 50 für einen Bewegungseffekt bedeutet beispielsweise, dass das Objekt halb so breit wie der Bildschirm nach rechts verschoben wird. Lese-/Schreibzugriff.

Syntax

Ausdruck. ByX

Ausdruck Eine Variable, die ein ScaleEffect-Objekt darstellt.

Rückgabewert

Single

HinwBemerkungeneise

Negative Werte verschieben das Objekt horizontal nach links. Gleitkommazahlen (zum Beispiel 55,5) sind zulässig.

Zum Skalieren oder verschieben Sie ein Objekt vertikal, verwenden Sie die ByY -Eigenschaft.

Wenn sowohl die ByX- als auch die ByY -Eigenschaften festgelegt werden, kann das Objekt ist skaliert oder horizontal und vertikal verschoben.

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

Beispiel

Im folgenden Beispiel wird ein Animationspfad hinzugefügt. Anschließend wird die horizontale und vertikale Verschiebung der Form festgelegt.

Sub AddMotionPath()

    Dim effCustom As Effect
    Dim animBehavior As AnimationBehavior
    Dim shpRectangle As Shape

    'Adds rectangle and sets effect and animation
    Set shpRectangle = ActivePresentation.Slides(1).Shapes _
        .AddShape(Type:=msoShapeRectangle, Left:=300, _
        Top:=300, Width:=300, Height:=150)

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

    Set animBehavior = effCustom.Behaviors.Add(msoAnimTypeMotion)

    'Specifies animation motion
    With animBehavior.MotionEffect
        .ByX = 50
        .ByY = 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.

Share via