Timing.Accelerate property (PowerPoint)
Returns or sets the percentage of the duration over which a timing acceleration should take place. Read/write.
expression A variable that represents an Timing object.
For example, a value of 0.9 means that an acceleration should start slower than the default speed for 90% of the total animation time, with the last 10% of the animation at the default speed.
To slow down an animation at the end, use the Decelerate property.
This example adds a shape and adds an animation, starting out slow and matching the default speed after 30% of the animation sequence.
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
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.