KeyBinding.KeyString (Word)

Retorna a sequência de combinação de teclas para as chaves especificadas por exemplo, CTRL + SHIFT + A. Cadeia de caracteressomente leitura.

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