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.
Comentários
Em breve: Ao longo de 2024, eliminaremos os problemas do GitHub como o mecanismo de comentários para conteúdo e o substituiremos por um novo sistema de comentários. Para obter mais informações, consulte https://aka.ms/ContentUserFeedback.
Enviar e exibir comentários de