Propiedad TimeLine.InteractiveSequences (PowerPoint)

Devuelve un objeto Sequences que representa las animaciones que se desencadenan al hacer clic en la forma especificada.

Sintaxis

expresión. InteractiveSequences

expresión Variable que representa un objeto TimeLine .

Valor devuelto

Sequences

Observaciones

El valor predeterminado de la propiedad InteractiveSequences es una colección Sequences vacía.

Ejemplo

En el siguiente ejemplo se agrega una secuencia interactiva a la primera diapositiva y se establecen las propiedades de efecto de texto para la nueva secuencia de animación.

Sub NewInteractiveSequence()

    Dim seqInteractive As Sequence
    Dim shpText As Shape
    Dim effText As Effect

    Set seqInteractive = ActivePresentation.Slides(1).TimeLine _
        .InteractiveSequences.Add(1)

    Set shpText = ActivePresentation.Slides(1).Shapes(1)
    Set effText = ActivePresentation.Slides(1).TimeLine _
        .MainSequence.AddEffect(Shape:=shpText, _
        EffectId:=msoAnimEffectChangeFont, _
        Trigger:=msoAnimTriggerOnPageClick)

    effText.EffectParameters.FontName = "Broadway"
    seqInteractive.ConvertToTextUnitEffect Effect:=effText, _
        UnitEffect:=msoAnimTextUnitEffectByWord

End Sub

Vea también

Objeto de escala 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.