Evento Application.PresentationClose (PowerPoint)

Ocorre imediatamente antes de qualquer apresentação aberta ser fechada, pois é removido da coleção Presentations.

Sintaxe

expression. PresentationClose( _Pres_ )

expressão Uma expressão que devolve um objeto Aplicação .

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
Pres	Obrigatório	Presentation	A apresentação que está sendo fechada.

Exemplo

Este exemplo salva uma cópia da apresentação ativa como um arquivo HTML, com o mesmo nome e dentro da mesma pasta.

Private Sub App_PresentationClose(ByVal Pres As Presentation)
    FindNum = InStr(1, Pres.FullName, ".")
    HTMLName = Mid(Pres.FullName, 1, FindNum - 1) _
        & ".htm"
    Pres.SaveCopyAs HTMLName, ppSaveAsHTML
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.