KeyBinding.KeyString (Word)

Returns the key combination string for the specified keys (for example, CTRL+SHIFT+A).

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