Propriedade Timing.AutoReverse (PowerPoint)

Determina se um efeito deve funcionar no sentido direto e depois no sentido inverso, duplicando assim sua duração. Leitura/gravação.

Sintaxe

expression. AutoReverse

Expressão Uma variável que representa um objeto Timing .

Valor de retorno

MsoTriState

Comentários

O valor da propriedade AutoReverse pode ser uma destas constantes MsoTriState.

Constante	Descrição
msoFalse	O padrão. O efeito não é executado no sentido direto e depois inverso.
msoTrue	O efeito é executado no sentido direto e depois inverso.

Exemplo

O exemplo a seguir adiciona uma forma e um efeito de animação à forma e define a animação para o sentido inverso, depois de terminar a movimentação direta.

Sub SetEffectTiming()

    Dim effDiamond As Effect
    Dim shpRectangle As Shape

    'Adds rectangle and applies diamond effect
    Set shpRectangle = ActivePresentation.Slides(1).Shapes.AddShape _
        (Type:=msoShapeRectangle, Left:=100, _
        Top:=100, Width:=50, Height:=50)

    Set effDiamond = ActivePresentation.Slides(1).TimeLine _
        .MainSequence.AddEffect(Shape:=shpRectangle, _
         effectId:=msoAnimEffectPathDiamond)

    'Sets the duration of and reverses the effect
    With effDiamond.Timing
        .Duration = 5 ' Length of effect.
        .AutoReverse = msoTrue
    End With

End Sub

Confira também

Objeto de intervalos

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.