Evento Application.ProtectedViewWindowBeforeClose (Word)
Se produce inmediatamente antes de que se cierre una ventana vista protegida o un documento de una ventana vista protegida.
Sintaxis
expresión. ProtectedViewWindowBeforeClose( _PvWindow_ , _CloseReason_ , _Cancel_ )
Expresión Expresión que devuelve un objeto Application .
Parameters
| Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
|---|---|---|---|
| PvWindow | Obligatorio | ProtectedViewWindow | Ventana Vista protegida que está cerrada. |
| CloseReason | Obligatorio | [INT] | Constante de la enumeración WdProtectedViewCloseReason que especifica el motivo por el que se cierra la ventana Vista protegida. |
| Cancel | Obligatorio | Boolean | False cuando se produce el evento. Si el procedimiento de evento establece este argumento en True, la ventana no se cerrará al finalizar el procedimiento. |
Nota:
Si se llama al evento ProtectedViewWindowsBeforeClose como parte del método ProtectedView.Edit , al establecer Cancelar en True no se produce ninguna acción.
|
Ejemplo:
En el ejemplo de código siguiente se solicita al usuario una respuesta de sí o no antes de cerrar cualquier documento. Este código debe colocarse en un módulo de clase y se debe inicializar correctamente una instancia de la clase para ver este ejemplo funcionar. Para obtener más información sobre cómo hacerlo, consulte Uso de eventos con el objeto Application.
En el siguiente ejemplo de código, se supone que se ha declarado una variable de aplicación denominada "App" en las declaraciones generales y que se ha establecido la variable igual al objeto Application de Word.
Private Sub App_ProtectedViewWindowBeforeClose(ByVal PvWindow As ProtectedViewWindow, ByVal CloseReason As Long, Cancel As Boolean)
Dim intResponse As Integer
intResponse = MsgBox("Do you really " _
& "want to close the document?", _
vbYesNo)
If intResponse = vbNo Then Cancel = True
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.