Effect.MoveTo メソッド (PowerPoint)

指定したオブジェクトを同じコレクション内の場所に移動し、コレクションの他のすべてのアイテムの番号を振り直します。

構文

式。 MoveTo( _toPos_ )

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

パラメーター

名前	必須 / オプション	データ型	説明
トポス	必須	長整数型 (Long)	アニメーション効果の移動先のインデックス位置を指定します。

例

次の使用例は、指定した図形のアニメーション効果のコレクションのアニメーション効果 2 にアニメーション効果を移動します。

Sub MoveEffect()

    Dim sldFirst as Slide
    Dim shpFirst As Shape
    Dim effAdd As Effect

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

    effAdd.MoveTo toPos:=2

End Sub

次の使用例は、作業中のプレゼンテーションのスライド 2 をスライド 1 に移動します。

Sub MoveSlideToNewLocation()
    ActivePresentation.Slides(2).MoveTo toPos:=1
End Sub

関連項目

Effect オブジェクト

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

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