Événement Application.ProtectedViewWindowBeforeClose (Word)

Article
04/07/2023

Se produit immédiatement avant la fermeture d’une fenêtre Mode protégé ou d’un document dans une fenêtre En mode protégé.

Syntaxe

expression. ProtectedViewWindowBeforeClose( _PvWindow_ , _CloseReason_ , _Cancel_ )

Expression Expression qui renvoie un objet Application .

Parameters

Nom	Requis/Facultatif	Type de données	Description
PvWindow	Obligatoire	ProtectedViewWindow	Fenêtre Mode protégé qui est fermée.
CloseReason	Obligatoire	[INT]	Constante dans l’énumération WdProtectedViewCloseReason qui spécifie la raison pour laquelle la fenêtre Mode protégé est fermée.
Cancel	Obligatoire	Booléen	False lorsque l'événement se produit. Si la procédure événementielle affecte à cet argument la valeur True, la fenêtre ne se ferme pas lorsque la procédure est terminée.

Remarque

Si l’événement ProtectedViewWindowsBeforeClose est appelé dans le cadre de la méthode ProtectedView.Edit , définir Cancel sur True ne produit aucune action.

Exemple

L'exemple de code suivant demande à l'utilisateur de 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 l'exemple fonctionne. Pour plus d’informations sur la procédure à suivre, consultez Utilisation d’événements avec l’objet Application.

Cet exemple de code présuppose que vous avez déclaré une variable d'application dénommée « App » dans vos déclarations générales et que vous lui avez affecté une valeur identique à celle de l'objet Application de Word.

Private Sub App_ProtectedViewWindowBeforeClose(ByVal PvWindow As ProtectedViewWindow, ByVal CloseReason As Long, 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

Voir aussi

Objet Application

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.

Partager via