Événement Application.DocumentBeforeClose (Word)

Se produit immédiatement avant la fermeture d'un document.

Remarque

Si vous travaillez avec un document incorporé dans un autre document, cet événement ne se produit pas.

Syntaxe

Private Sub expression 'DocumentBeforeClose** (Doc As Document**, Cancel As 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 de fermeture.
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 ne se ferme pas lorsque la procédure est terminée.

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 de fermer 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_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

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.