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.