Share via


Timing.Restart Property

PowerPoint Developer Reference

Represents whether the animation effect restarts after the effect has started once. Read/write.

Syntax

expression.Restart

expression   A variable that represents a Timing object.

Return Value
MsoAnimEffectRestart

Remarks

The value of the Restart property can be one of these MsoAnimEffectRestart constants. The default is msoAnimEffectRestartNever.

msoAnimEffectRestartAlways
msoAnimEffectRestartNever
msoAnimEffectRestartWhenOff

Example

The following example adds a shape and an animation to it, then sets the animation's restart behavior.

Visual Basic for Applications
  Sub AddShapeSetTiming()
    Dim effDiamond As Effect
    Dim shpRectangle As Shape
'Adds shape and sets animation
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 = 3
    .RepeatDuration = 5
    .RepeatCount = 3
    .<strong>Restart</strong> = msoAnimEffectRestartAlways
End With

End Sub

See Also