次の方法で共有

Timing.Accelerate プロパティ (PowerPoint)

  • [アーティクル]

タイミングを加速する時間の割合を設定します。 値の取得と設定が可能です。

構文

式。 Accelerate

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

戻り値

1 行

注釈

たとえば、値 0.9 は、アニメーション時間の開始から 90% を既定の速度よりも遅く実行し、アニメーションの最後の 10% を既定の速度で実行することを意味します。

最後にアニメーションの速度が低下、 減速 プロパティを使用します。

例

次の使用例は、図形を追加し、アニメーションを追加します。アニメーションは、最初は遅い速度で実行し、アニメーション シーケンスの 30% 以降に既定の速度になります。

Sub AddShapeSetTiming()

    Dim effDiamond As Effect
    Dim shpRectangle As Shape

    'Adds rectangle and specifies effect to use for rectangle
    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)

    'Specifies the acceleration for the effect

    With effDiamond.Timing
        .Accelerate = 0.3
    End With

End Sub

関連項目

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

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

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