Timing.SmoothStart property (PowerPoint)
Determines whether an animation should accelerate when it starts. Read/write.
expression. SmoothStart
expression A variable that represents a Timing object.
MsoTriState
The value of the SmoothStart property can be one of these MsoTriState constants.
Constant | Description |
---|---|
msoFalse | The default. The animation does not accelerate when it starts. |
msoTrue | The animation accelerates when it starts. |
The following example adds a shape to a slide, animates the shape, and instructs the shape to accelerate when it starts.
Sub AddShapeSetTiming()
Dim effDiamond As Effect
Dim shpRectangle As Shape
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)
With effDiamond.Timing
.Duration = 5
.SmoothStart = msoTrue
End With
End Sub
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.