Événement Application.DocumentBeforeSave (Word)

  • Article

Se produit avant l'enregistrement d'un document ouvert.

Syntaxe

expression. DocumentBeforeSave (DocAs Document**, SaveAsUIAs Boolean, CancelAs Boolean)

Expression Variable qui représente un objet « Application » déclaré avec des événements dans un module de classe.

Parameters

Nom Requis/Facultatif Type de données Description
Doc Obligatoire Document Document en cours d'enregistrement.
SaveAsUI Obligatoire Booléen True si la boîte de dialogue Enregistrer sous s'affiche, s'il faut enregistrer un nouveau document, en réponse à la commande Enregistrer; ou en réponse à la commande Enregistrer sous. ou en réponse à la méthode SaveAs ou SaveAs2.
Cancel Obligatoire Booléen False lorsque l'événement se produit. Si la procédure événementielle affecte à cet argument la valeur True, le document n'est pas enregistré au terme de la procédure.

Remarques

Pour plus d’informations sur l’utilisation d’événements avec l’objet Application , consultez Utilisation d’événements avec l’objet Application.

Exemple

Cet exemple montre comment inviter l’utilisateur à répondre oui ou non avant d’enregistrer un document. Ce code doit être placé dans un module de classe et une instance de la classe doit être correctement initialisée pour que cet exemple fonctionne . Consultez Utilisation d’événements avec l’objet Application pour obtenir des instructions sur la façon d’y parvenir.

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

Voir aussi

Objet Application

Enregistrement automatique

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.