Compartilhar via

Evento Application.SlideShowEnd (PowerPoint)

  • Artigo

Ocorre após o término de uma apresentação de slides, imediatamente depois que o último evento SlideShowNextSlide ocorrer.

Sintaxe

expression. SlideShowEnd( _Pres_ )

Expressão Uma expressão que retorna um objeto Application .

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
Pres Obrigatório Presentation A apresentação fechada quando este evento ocorre.

Comentários

O evento SlideShowEnd sempre ocorre antes de uma apresentação de slides é encerrada se o evento SlideShowBegin tenha ocorrido. Use o evento SlideShowEnd para retornar as configurações de propriedade e as inicializações variáveis que ocorrem no evento SlideShowBegin para suas configurações originais.

Para obter mais informações sobre o uso de eventos com o objeto Application, consulte Como usar eventos com o objeto Application.

Exemplo

Este exemplo desativa o efeito de entrada e os efeitos de transição de intervalo de avanço automático da apresentação de slides para os slides de um a quatro no final da apresentação de slides. Ele também configura os slides para o avanço manual.

Private Sub App_SlideShowEnd(ByVal Pres As Presentation)

    With Pres.Slides.Range(Array(1, 4)) _
            .SlideShowTransition

        .EntryEffect = ppEffectNone

        .AdvanceOnTime = msoFalse

    End With



    With Pres.SlideShowSettings

        .AdvanceMode = ppSlideShowManualAdvance

    End With

End Sub

Confira também

Objeto de Aplicativo

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.