MotionEffect Object
Collapse the table of content
Expand the table of content

MotionEffect Object (PowerPoint)

Office 2013 and later

Contribute to this content

Use GitHub to suggest and submit changes. See our guidelines for contributing to VBA documentation.

Represents a motion effect for an AnimationBehavior object.

Use the MotionEffect propety of the AnimationBehavior object to return a MotionEffect object. The following example refers to the motion effect for a given animation behavior.


Use the ByX , ByY , FromX , FromY , ToX , and ToY properties of the MotionEffect object to construct a motion path. The ToY and ToX properties are in percentage, where ToX = 1.0 means 100% of slide width and ToY = 1.0 means 100% of slide height. The following example adds a shape to the first slide and creates a motion path.

Sub AddMotionPath()

    Dim shpNew As Shape

    Dim effNew As Effect

    Dim aniMotion As AnimationBehavior

    Set shpNew = ActivePresentation.Slides(1).Shapes _

        .AddShape(Type:=msoShape5pointStar, Left:=0, _

        Top:=0, Width:=100, Height:=100)

    Set effNew = ActivePresentation.Slides(1).TimeLine.MainSequence _

        .AddEffect(Shape:=shpNew, effectId:=msoAnimEffectCustom, _


    Set aniMotion = effNew.Behaviors.Add(msoAnimTypeMotion)

    With aniMotion.MotionEffect

        .FromX = 0

        .FromY = 0

        .ToX = .5

        .ToY = .5

    End With

End Sub
© 2016 Microsoft