How to set a shortcut key for label?

object.KeyLabel(keycode) [= string] You would probably create the menu item as follows: .Add "keyFile", , , "E&xit", , vbAltMask + vbCtrlMask, vbKeyEnd The default key label for vbKeyEnd is "End". Thus, the shortcut string will be created by default as "Ctrl+Alt+End".