Evento Application.DocumentBeforeClose (Word)

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.

Comentarios

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.