Evento Application.DocumentBeforeSave (Word)
Este evento se produce antes de que se guarde cualquier documento abierto.
Sintaxis
expresión. DocumentBeforeSave (DocAs Document**, SaveAsUIAs Boolean, CancelAs 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 guarda. |
| SaveAsUI | Obligatorio | Boolean | True si se muestra el cuadro de diálogo Guardar como, si desea guardar un documento nuevo, en respuesta al comando Guardar; o bien, en respuesta al comando Guardar como; o bien, en respuesta al método SaveAs o SaveAs2. |
| Cancel | Obligatorio | Boolean | False cuando se produce el evento. Si el procedimiento de evento establece este argumento en True, no se guarda el documento 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 guardar 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_DocumentBeforeSave _
(ByVal Doc As Document, _
SaveAsUI As Boolean, _
Cancel As Boolean)
Dim intResponse As Integer
intResponse = MsgBox("Do you really want to " _
& "save 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.