Effect.MoveAfter メソッド (PowerPoint)

1 つのアニメーション効果を別のアニメーション効果の後に移動します。

構文

式。 MoveAfter( _Effect_ )

式Effect オブジェクトを表す変数。

例

次の使用例は、1 つの効果を別の効果の後に移動します。

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

関連項目

Effect オブジェクト

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。