Événement Application.DocumentBeforeClose (Publisher)

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

Syntaxe

expression. DocumentBeforeClose (Doc, Cancel)

expressionUne variable qui représente un objetApplication.

Paramètres

Nom	Requis/Facultatif	Type de données	Description
Doc	Obligatoire	Document	Document en cours de fermeture.
Annuler	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 accéder aux événements de l’objet Application , déclarez une variable objet Application dans la section Déclarations générales d’un module de code, puis définissez la variable sur l’objet Application pour lequel vous souhaitez accéder aux événements.

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

Exemple

Cet exemple invite l'utilisateur à répondre par oui ou par non avant de refermer un document. Pour que cet exemple fonctionne, placez ce code dans un module de classe et initialisez correctement une instance de cette classe au moyen d'un exemple analogue à la routine SetPubApp ci-dessous.

Private WithEvents PubApp As Application 
 
Sub SetPubApp() 
 Set PubApp = Publisher.Application 
End Sub 
 
Private Sub PubApp_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.