AnimationBehavior.ScaleEffect-Eigenschaft (PowerPoint)

Gibt ein ScaleEffect -Objekt für ein bestimmtes Animationsverhalten zurück. Schreibgeschützt.

Syntax

Ausdruck. ScaleEffect

Ausdruck Eine Variable, die ein AnimationBehavior-Objekt darstellt.

Rückgabewert

ScaleEffect

Beispiel

In diesem Beispiel wird die erste Form der ersten Folie skaliert. Begonnen wird bei Null und die Größe dann geändert, bis sie 100 % der Originalgröße erreicht hat.

Sub ChangeScale()

    Dim shpFirst As Shape
    Dim effNew As Effect
    Dim aniScale As AnimationBehavior

    Set shpFirst = ActivePresentation.Slides(1).Shapes(1)
    Set effNew = ActivePresentation.Slides(1).TimeLine.MainSequence _
        .AddEffect(Shape:=shpFirst, effectId:=msoAnimEffectCustom)

    Set aniScale = effNew.Behaviors.Add(msoAnimTypeScale)
    With aniScale.ScaleEffect
        'Starting size
        .FromX = 0
        .FromY = 0

        'Size after scale effect
        .ToX = 100
        .ToY = 100
    End With
	
End Sub

Siehe auch

AnimationBehavior-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.