Compartir a través de


Propiedad SlideShowTransition.Duration (PowerPoint)

Devuelve o establece la duración de una animación en segundos. Lectura y escritura.

Sintaxis

expresión. Duration

Expresión Variable que representa un objeto Timing .

Valor devuelto

Simple

Ejemplo:

En el siguiente ejemplo se agrega una forma y una animación a dicha forma y, a continuación, se establece la duración de la animación.

Sub AddShapeSetTiming()

    Dim effDiamond As Effect
    Dim shpRectangle As Shape

    'Adds 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:=sh, effectId:=msoAnimEffectPathDiamond)

    'Sets duration of effect
    effDiamond.Timing.Duration = 5

End Sub

Consulte también

ObjetoTiming SlideShowTransition (objeto)

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.