Application.KeysBoundTo Property (Word)
Returns a KeysBoundTo object that represents all the key combinations assigned to the specified item.
expression .KeysBoundTo(KeyCategory, Command, CommandParameter)
expression A variable that represents an Application object. Optional.
Parameters
Name | Required/Optional | Data Type | Description |
|---|---|---|---|
KeyCategory | Required | WdKeyCategory | The category of the key combination. |
Command | Required | String | The name of the command. |
CommandParameter | Optional | Variant | Additional text, if any, required for the command specified by Command. For more information, see the "Remarks" section in the Add method for the KeyBindings object. |
This example displays all the key combinations assigned to the FileOpen command in the template attached to the active document.
Dim kbLoop As KeyBinding Dim strOutput As String CustomizationContext = ActiveDocument.AttachedTemplate For Each kbLoop In _ KeysBoundTo(KeyCategory:=wdKeyCategoryCommand, _ Command:="FileOpen") strOutput = strOutput & kbLoop.KeyString & vbCr Next kbLoop MsgBox strOutput
This example removes all key assignments from Macro1 in the Normal template.
Dim aKey As KeyBinding CustomizationContext = NormalTemplate For Each aKey In _ KeysBoundTo(KeyCategory:=wdKeyCategoryMacro, _ Command:="Macro1") aKey.Disable Next aKey