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