Método Sequence.FindFirstAnimationFor (PowerPoint)

Retorna um objeto Effect que representa a primeira animação para uma determinada forma.

Sintaxe

expression. FindFirstAnimationFor( _Shape_ )

expressão Uma variável que representa um objeto Sequence .

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
Shape Obrigatório Forma A forma à qual a primeira animação será encontrada.

Valor de retorno

Efeito

Exemplo

O exemplo a seguir localiza e exclui a primeira animação da primeira forma no primeiro slide. Esse exemplo pressupõe que exista ao menos um efeito de animação para a forma especificada.

Sub FindFirstAnimation()

    Dim sldFirst As Slide
    Dim shpFirst As Shape
    Dim effFirst As Effect

    Set sldFirst = ActivePresentation.Slides(1)
    Set shpFirst = sldFirst.Shapes(1)

    Set effFirst = sldFirst.TimeLine.MainSequence _
        .FindFirstAnimationFor(Shape:=shpFirst)

    effFirst.Delete

End Sub

Confira também

Objeto Sequence

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.