Evento Application.WindowDeactivate (PowerPoint)

Artigo
04/07/2023

Ocorre quando a janela do aplicativo ou qualquer janela de documento é desativada.

Sintaxe

expressão. WindowDeactivate (Pres, Wn)

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

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
Pres	Obrigatório	Presentation	A apresentação exibida na janela desativada.
Wn	Obrigatório	DocumentWindow	A janela de documento desativada.

Exemplo

Este exemplo localiza o nome de arquivo (sem a extensão) correspondente à apresentação na janela que está sendo desativada. Em seguida, ele acrescenta a extensão .htm ao nome do arquivo e a salva como uma página da Web na mesma pasta que a apresentação.

Private Sub App_WindowDeactivate (ByVal Pres As Presentation, ByVal Wn As DocumentWindow)

    FindNum = InStr(1, Wn.Presentation.FullName, ".")

    If FindNum = 0 Then

        HTMLName = Wn.Presentation.FullName & ".htm"

    Else

        HTMLName = Mid(Wn.Presentation.FullName, 1, FindNum - 1) _
            & ".htm"

    End If

    Wn.Presentation.SaveCopyAs HTMLName, ppSaveAsHTML

    MsgBox "Presentation being saved in HTML format as " _
        & HTMLName & " ."

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.

Compartilhar via