共用方式為


時機。Decelerate Property (PowerPoint)

設定或回傳時序減速應進行的持續時間百分比。 讀取/寫入。

語法

expressionDecelerate

一個代表 Timing 物件的變數。

傳回值

單一

註解

例如,0.9 是表示啟動的減速應該符合預設速度,而在前百分之十的動畫時間之後,開始降低速度。

範例

這則範例會加入一個圖案和一個動畫,該動畫一開始會以預設速度播放,而在完成動畫的 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 支援與意見反應