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
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.