PowerPoint.Effect.MoveAfter.md

title	keywords	f1_keywords	api_name	ms.assetid	ms.date	ms.localizationpriority
Effect.MoveAfter method (PowerPoint)	vbapp10.chm652006	vbapp10.chm652006	PowerPoint.Effect.MoveAfter	1d19f90c-51a6-d9bd-5593-53c67c7df415	06/08/2017	medium

Effect.MoveAfter method (PowerPoint)

Moves one animation effect to after another animation effect.

Syntax

expression. MoveAfter( _Effect_ )

expression A variable that represents an Effect object.

Example

The following example moves one effect to after another.

Sub MoveEffect()

    Dim effOne As Effect
    Dim effTwo As Effect
    Dim shpFirst As Shape

    Set shpFirst = ActivePresentation.Slides(1).Shapes(1)

    Set effOne = ActivePresentation.Slides(1).TimeLine.MainSequence.AddEffect _
        (Shape:=shpFirst, effectId:=msoAnimEffectBlinds)

    Set effTwo = ActivePresentation.Slides(1).TimeLine.MainSequence.AddEffect _
        (Shape:=shpFirst, effectId:=msoAnimEffectBlast)

    effOne.MoveAfter Effect:=effTwo

End Sub

See also

Effect Object

[!includeSupport and feedback]