Partager via


Événement Application.WorkbookBeforeSave (Excel)

Cet événement se produit avant l'enregistrement de tout classeur ouvert.

Remarque

Dans Office 365, Excel prend en charge l’enregistrement automatique, ce qui permet d’enregistrer automatiquement et en continu les modifications de l’utilisateur. Pour plus d’informations, consultez Comment l’enregistrement automatique affecte les compléments et les macros pour vous assurer que l’exécution de code en réponse aux fonctions d’événement WorkbookBeforeSave est prévue lorsque l’enregistrement automatique est activé.

Syntaxe

expression. WorkbookBeforeSave (Wb, SaveAsUI, Cancel)

expressionUne variable qui représente un objetApplication.

Paramètres

Nom Requis/Facultatif Type de données Description
Wb Obligatoire Classeur Classeur.
SaveAsUI Obligatoire Booléen Cet argument a la valeur True si la boîte de dialogue Enregistrer sous s'affiche en raison de modifications apportées qui doivent être enregistrées dans le classeur.
Cancel Obligatoire Booléen Cet argument a la valeur False lorsque l'événement se produit. Si la procédure de l'événement lui affecte la valeur True, le classeur n'est pas enregistré à la fin de la procédure.

Valeur renvoyée

Aucune

Exemple

Cet exemple montre comment inviter l'utilisateur à répondre par oui ou non à la question de l'enregistrement d'un classeur.

Private Sub App_WorkbookBeforeSave(ByVal Wb As Workbook, _ 
 ByVal SaveAsUI As Boolean, Cancel as Boolean) 
 a = MsgBox("Do you really want to save the workbook?", vbYesNo) 
 If a = vbNo Then Cancel = True 
End Sub

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.