Événement Worksheet.BeforeRightClick (Excel)

Cette méthode se produit lorsqu'un utilisateur clique avec le bouton droit de la souris sur une feuille de calcul, avant l'action par défaut de clic avec le bouton droit.

Syntaxe

expression. BeforeRightClick (Target , Cancel)

expression Variable qui représente un objet Feuille de calcul.

Parameters

Nom	Requis/Facultatif	Type de données	Description
Target	Obligatoire	Range	Cellule la plus proche du pointeur de la souris lorsque le clic avec le bouton droit de la souris se produit.
Cancel	Obligatoire	Booléen	False lorsque l'événement se produit. Si la procédure événementielle attribue à cet argument la valeur True, l’action par défaut de clic avec le bouton droit n’est pas exécutée à la fin de la procédure.

Remarques

Comme pour d'autres événements de feuille de calcul, celui-ci ne se produit pas si l'utilisateur clique avec le bouton droit de la souris lorsque le pointeur se trouve sur une forme ou une barre de commandes (une barre d'outils ou une barre de menus).

Exemple

Cet exemple montre comment ajouter un nouvel élément au menu contextuel pour les cellules B1:B10.

Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, _ 
 Cancel As Boolean) 
 Dim icbc As Object 
 For Each icbc In Application.CommandBars("cell").Controls 
 If icbc.Tag = "brccm" Then icbc.Delete 
 Next icbc 
 If Not Application.Intersect(Target, Range("b1:b10")) _ 
 Is Nothing Then 
 With Application.CommandBars("cell").Controls _ 
 .Add(Type:=msoControlButton, before:=6, _ 
 temporary:=True) 
 .Caption = "New Context Menu Item" 
 .OnAction = "MyMacro" 
 .Tag = "brccm" 
 End With 
 End If 
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.