Compartir a través de


Evento Application.WindowDeactivate (PowerPoint)

Se produce cuando se desactiva la ventana de la aplicación o cualquiera de las ventanas de documento.

Sintaxis

expresión. WindowDeactivate (Pres, Wn)

expresión Variable que representa un objeto Application.

Parámetros

Nombre Obligatorio/opcional Tipo de datos Descripción
Pres Obligatorio Presentation Presentación que se muestra en la ventana desactivada.
Wn Obligatorio DocumentWindow Ventana de documento desactivada.

Ejemplo:

En este ejemplo se busca el nombre de archivo (sin extensión) de la presentación que aparece en la ventana que se va a desactivar. A continuación, anexa la extensión .htm al nombre de archivo y la guarda como una página web en la misma carpeta que la presentación.

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

Vea también

Objeto Application

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.