Objeto AnimationBehaviors (PowerPoint)

Representa uma coleção de objetos AnimationBehavior.

Exemplo

Use o método Add para adicionar um comportamento de animação. O exemplo a seguir adiciona um comportamento de rotação animada de cinco segundos à sequência de animação principal do primeiro slide.

Sub AnimationObject()

    Dim timeMain As TimeLine



    'Reference the main animation timeline

    Set timeMain = ActivePresentation.Slides(1).TimeLine



    'Add a five-second animated rotation behavior

    'as the first animation in the main animation sequence

    timeMain.MainSequence(1).Behaviors.Add Type:=msoAnimTypeRotation, Index:=1

End Sub

Confira também

Referência de modelo de objeto do PowerPoint

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.