Objeto AnimationSettings (PowerPoint)

Representa os efeitos especiais aplicados à animação da forma especificada durante uma apresentação de slides.

Exemplo

Use a AnimationSettingspropriedade do objeto Shape para retornar o objeto AnimationSettings. O exemplo a seguir adiciona um slide que contém um título e uma lista de três itens à apresentação ativa e define a lista seja animada por parágrafos de primeiro nível, para surgir da esquerda quando animada, a esmaecer a cor especificada após ser animada e animar seus itens na ordem inversa.

Set sObjs = ActivePresentation.Slides.Add(2, ppLayoutText).Shapes

sObjs.Title.TextFrame.TextRange.Text = "Top Three Reasons"

With sObjs.Placeholders(2)

    .TextFrame.TextRange.Text = _

        "Reason 1" & VBNewLine & "Reason 2" & VBNewLine & "Reason 3"

    With .AnimationSettings

        .TextLevelEffect = ppAnimateByFirstLevel

        .EntryEffect = ppEffectFlyFromLeft

        .AfterEffect = ppAfterEffectDim

        .DimColor.RGB = RGB(100, 120, 100)

        .AnimateTextInReverse = True

    End With

End With

Propriedades

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.