SlideShowTransition.Duration プロパティ (PowerPoint)

アニメーションの長さを秒単位で設定します。 値の取得と設定が可能です。

構文

式。 Duration

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

戻り値

1 行

例

次の使用例は、図形を追加し、その図形にアニメーションを追加します。次に、アニメーションの長さを設定します。

Sub AddShapeSetTiming()

    Dim effDiamond As Effect
    Dim shpRectangle As Shape

    'Adds shape and sets animation effect
    Set shpRectangle = ActivePresentation.Slides(1).Shapes _
        .AddShape(Type:=msoShapeRectangle, Left:=100, _
        Top:=100, Width:=50, Height:=50)

    Set effDiamond = ActivePresentation.Slides(1).TimeLine.MainSequence _
       .AddEffect(Shape:=sh, effectId:=msoAnimEffectPathDiamond)

    'Sets duration of effect
    effDiamond.Timing.Duration = 5

End Sub

関連項目

タイミング オブジェクトSlideShowTransition オブジェクト

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

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