OVH Cloud OVH Cloud

CLIC DROIT

3 réponses
Avatar
JACK 43
Bonsoir,

unr petite question pratique :

Peut-on associé une macro au clic droit de la souris et si oui uniquement
dans la feuil3 par exemple

MERCI A +

3 réponses

Avatar
Daniel
Tu peux utiliser l'évenement before right click, mais pour faire propre, il
faudrait désactiver le menu contextuel qui s'affiche intempestivement.
Daniel
"JACK 43" (sansspam)> a écrit dans le message de
news:
Bonsoir,

unr petite question pratique :

Peut-on associé une macro au clic droit de la souris et si oui uniquement
dans la feuil3 par exemple

MERCI A +


Avatar
Pounet95
Bonsoir,
Je serai tenté de répondre oui, mais comme ce soir je raconte des aneries
plus grosses que moi !
J'ose quand même ce code dans le module VBA de la feuille 3
Au besoin, mettre Cancel =True pour empêcher l'affichage du menu contextuel

Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As
Boolean)
MsgBox "yes"
Cancel =True
End Sub

--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
Conseillé :
http://dj.joss.free.fr/netiquet.htm
(charte, nétiquette, conseils, abréviations, souriettes...)
http://www.excelabo.net/mpfe/connexion.php
(connexion, conseils...)

"JACK 43" (sansspam)> a écrit dans le message de
news:
Bonsoir,

unr petite question pratique :

Peut-on associé une macro au clic droit de la souris et si oui uniquement
dans la feuil3 par exemple

MERCI A +


Avatar
JB
Bonjour,

Placer dans Feuil3

Private Sub Worksheet_Activate()
Set temp = CommandBars("cell").Controls.Add
temp.Caption = "babla"
temp.OnAction = "MaMacro"
temp.FaceId = 120 ' à définir
temp.BeginGroup = True
End Sub

Private Sub Worksheet_Deactivate()
Application.CommandBars("Cell").Reset
End Sub

Cordialement JB