AnimationBehavior.ScaleEffect property (PowerPoint)

Returns a ScaleEffect object for a given animation behavior. Read-only.

Syntax

expression. ScaleEffect

expression A variable that represents an AnimationBehavior object.

Return value

ScaleEffect

Example

This example scales the first shape on the first slide starting at zero and increasing in size until it reaches 100 percent of its original size.

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

See also

AnimationBehavior Object

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.