Propiedad Timing.Restart (PowerPoint)

Representa si el efecto de animación se reinicia después de iniciarse una vez. Lectura y escritura.

Sintaxis

expresión. Restart

expresión Variable que representa un objeto Timing .

Valor devuelto

MsoAnimEffectRestart

Observaciones

El valor de la propiedad reiniciar puede ser una de estas constantes MsoAnimEffectRestart. El valor predeterminado es msoAnimEffectRestartNever es el valor.

msoAnimEffectRestartAlways
msoAnimEffectRestartNever
msoAnimEffectRestartWhenOff

Ejemplo

Este ejemplo crea una forma, le agrega una animación y después establece el comportamiento de reinicio de la animación.

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
        .Restart = msoAnimEffectRestartAlways
    End With

End Sub

Vea también

Objeto de control de tiempo

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.