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.