Nota
O acceso a esta páxina require autorización. Pode tentar iniciar sesión ou modificar os directorios.
O acceso a esta páxina require autorización. Pode tentar modificar os directorios.
Este evento se produce antes de que se cierre cualquier documento.
Nota:
Si está trabajando con un documento incrustado dentro de otro documento, este evento no se producirá.
Sintaxis
Private Sub expression 'DocumentBeforeClose** (Doc As Document**, Cancel As Boolean)
expresión Variable que representa un objeto Application declarado con eventos en un módulo de clase.
Parameters
| Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
|---|---|---|---|
| Doc | Obligatorio | document | Documento que se cierra. |
| Cancel | Obligatorio | Boolean | False cuando se produce el evento. Si el procedimiento de evento establece este argumento en True, el documento no se cerrará al finalizar el procedimiento. |
Observaciones
Para obtener más información sobre el uso de eventos con el objeto Application , consulte Uso de eventos con el objeto Application.
Ejemplo
En este ejemplo, se pide confirmación al usuario antes de cerrar el documento. Este código debe colocarse en un módulo de clase y una instancia de la clase debe inicializarse correctamente para ver cómo funciona este ejemplo; consulte Uso de eventos con el objeto Application para obtener instrucciones sobre cómo hacerlo.
Public WithEvents appWord as Word.Application
Private Sub appWord_DocumentBeforeClose _
(ByVal Doc As Document, _
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
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.