KeyBinding.KeyString (Word)

Devuelve la cadena de la combinación de teclas de las claves especificadas (por ejemplo, CTRL + MAYÚS + A).

CustomizationContext = NormalTemplate 
If KeyBindings.Count >= 1 Then 
 MsgBox KeyBindings(1).KeyString 
End If