Événement Application.WindowBeforeRightClick (Word)

Se produit lorsqu'un utilisateur clique avec le bouton droit dans la zone d'édition d'une fenêtre de document avant le clic droit par défaut.

Syntaxe

Private Sub expression._'WindowBeforeRightClick** (Sel As Selection**, Cancel As Boolean)

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

Parameters

Nom	Requis/Facultatif	Type de données	Description
Sel	Obligatoire	Sélection	Sélection actuelle.
Cancel	Obligatoire	Booléen	False lorsque l'événement se produit. Si la procédure événementielle affecte la valeur true, le clic droit par défaut ne se produit 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 par oui ou non avant d’exécuter l’action de clic droit par défaut. 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 Applicationpour obtenir des instructions sur la façon d’y parvenir.

Public WithEvents appWord as Word.Application 
 
Private Sub appWord_WindowBeforeRightClick _ 
 (ByVal Sel As Selection, Cancel As Boolean) 
 Dim intResponse As Integer 
 
 intResponse = MsgBox("Selection = " & Sel & vbLf & vbLf _ 
 & "Continue with operation on this selection?", _ 
 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.