Timing.Decelerate プロパティ (PowerPoint)

タイミングの減速を行う期間の割合を設定または返します。 値の取得と設定が可能です。

構文

式。 Decelerate

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

戻り値

1 行

注釈

たとえば、値 0.9 は、既定の速度でアニメーションを開始し、アニメーションの最初の 10% を実行後に実行速度の減速を開始することを意味します。

例

次の使用例は、図形を追加し、既定の速度で開始して、全体の 70% を終了後に減速するアニメーションを追加します。

Sub AddShapeSetTiming()

    Dim effDiamond As Effect
    Dim shpRectangle As Shape

    'Adds rectangle 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:=shpRectangle, _
        effectId:=msoAnimEffectPathDiamond)

    'Slows the effect after seventy percent of the animation has finished

    With effDiamond.Timing
        .Decelerate = 0.3
    End With

End Sub

関連項目

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

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

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