Propiedad Timing.RepeatDuration (PowerPoint)

Devuelve o establece la duración, en segundos, de las animaciones repetidas. Lectura y escritura.

Sintaxis

expresión. RepeatDuration

Expresión Variable que representa un objeto Timing .

Valor devuelto

Simple

Comentarios

La animación se detiene al final de su secuencia de tiempo o el valor de la propiedad RepeatDuration, el que sea más corto.

Ejemplo:

En este ejemplo agrega una forma y una animación a ella, a continuación, se repite la animación diez veces. Sin embargo, después de cinco segundos, la animación será recortada, incluso si se interrumpe la animación de una escala de tiempo de 20 segundos (si no se especifica la propiedad Duration, una animación el valor predeterminado es dos segundos).

Sub AddShapeSetTiming()

    Dim effDiamond As Effect
    Dim shpRectangle As Shape

    'Adds new shape 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)

    'Sets repeat duration and number of times to repeat animation
    With effDiamond.Timing
        .RepeatDuration = 5
        .RepeatCount = 10
    End With

End Sub

Consulte 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.