Discussion :

[Xlcro]

ePour être clair, la touche "Menu contextuel" est située à droite de la barre d'espacement, à côté de la touche Control. Quand cette touche est enfoncée, Excel affiche par défaut le menu contextuel qui serait déroulé si le pointeur de la souris était déplacé à la position du curseur texte, le caret, et qu'un clic droit y était réalisé. Cette touche est essentielle à ceux qui travaillent exclusivement au clavier.

En utilisant l'événement Worksheet_BeforeRightClick, il est possible de supplanter le menu contextuel d'Excel et de lui substituer un menu de remplacement, plus approprié à l'application que l'on développe. Lorsque l'on procède de la sorte, la cohérence voudrait que ce même menu de remplacement soit affiché lorsque la touche Menu est enfoncée. Ce n'est pourtant pas le cas, Excel continuant d'afficher ses propres menus.

Je cherche donc un moyen d'associer à cette touche une macro qui afficherait le même menu que celui produit par le clic droit.

La méthode Application.OnKey n'a pas prévu de constante pour signifier cette touche clavier. Et la tentative naïve suivante ne donne pas de résultat positif, même si l'instruction s'exécute normalement :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
Application.OnKey chr$(vbKeyMenu), "MaMacro"

Quelqu'un aurait-il une idée sur la façon d'associer une macro à cette touche ?

[Transitoire]

Bonjour, j'utilise les OnKeys depuis très longtemps, mais étant sur Mac, nous n'avons pas les même touches . voici les codes pour la touche enter et Ctrl sur Mac, essayez donc d'adapter sur votre ordinateur.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Application.OnKey "{enter}", "EntréeSaisieAchats" 'changez bien évidemment le nom des Procédures 
Application.OnKey "^{enter}", "ValidationSaisieAchats"

Cordialement

[Xlcro]

Bonjour transitoire,

Merci de t'intéresser à ce problème.

La difficulté vient justement du fait que la méthode OnKey n'a pas prévu de constante string pour signifier cette touche du clavier. Je cherche don une manière de contourner cette limitation, ou une tout autre façon de procéder.

Bon dimanche.

[Transitoire]

Bonjour, je pense que vous pouvez utiliser une double touche pour déclencher votre procédure
Essayez le code ci-dessous. lancez la procédure testOn. a partir de la sur mon Mac, toutes les fois que je fait la double touche ctrl+enter, apparait un messagebox et cela tant que je n'ai pas passé la procédure testOff.
Attention, il n'est pas sur que sur PC , ctrl corresponde a "^" il est possible que soit en soit une autre, a vous d'essayer les correspondances. mais vous pouvez utiliser un autre jeu de touche comme alt+enter ou tab+enter.
vu les différences entre Mac et Pc, je ne peut pas vous renseigner plus que cela,désolé.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Sub testOn()
Application.OnKey "^{enter}", "Test2"
End Sub
Sub test2()
MsgBox "ca marche!"
End Sub
Sub testOff()
Application.OnKey "^{enter}"
End Sub

Cordialement

[Xlcro]

Bonjour Transitoire,

Je n'ai aucune difficulté à faire exécuter ma macro par OnKey si j'utilise une autre touche que "Menu contextuel". D'ailleurs, en attendant de trouver une solution, j'utilise Alt + FlècheBas.

Si je tiens à la touche Menu, c'est pour des raisons d'ergonomie. Pour les personnes travaillant exclusivement au clavier, les non-voyants notamment, cette touche est naturellement associé au clic droit de la souris, d'où mon entêtement à vouloir utiliser cette touche spécifique.

Merci de ton intérêt.

[Transitoire]

Bonjour, OK bien compris. désolé de ne pouvoir vous aider plus que cela.
Cordialement