Discussion :

[jpclabaux]

Salut,

J'ai ajouter un menu avec la commande

Code :

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

1
2
3
4
5
 
Set Nouveau = Application.CommandBars(1).Controls.Add(msoControlPopup, , , 8, True)
    With Nouveau
        .Caption = "monMenu"
    End With

Comment ajouter un raccourci clavier vers ce menu et faire afficher quelque chose du genre monMenu?

Merci,
Jean

[Pierre Fauconnier]

Salut.

Pour le raccourci clavier, quelle est l'application utilisée?

Pour le raccourci par soulignement, tu peux utiliser le caractère & dans la propriété caption.

Code :

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

.caption="Mon &Menu"

[jpclabaux]

Salut Pierre,

Merci beaucoup pour ton aide.
Ça ne semble pas grand chose mais pour moi ça fait toute la différence.

Bonne journée,
Jean