返回一个 KeysBoundTo 对象，该对象代表指定项的所有组合键。
语法
expression. KeysBoundTo( _KeyCategory_ , _Command_ , _CommandParameter_ )
expression：表示 Application 对象的变量。 可选。
参数
| 名称 | 必需/可选 | 数据类型 | 说明 |
|---|---|---|---|
| KeyCategory | 必需 | WdKeyCategory | 组合键的类别。 |
| Command | 必需 | String | 命令名称。 |
| CommandParameter | 可选 | Variant | 附加文本，如果有的话，所需的命令中指定的命令。 有关详细信息，请参阅"备注"部分中 的键绑定 对象的 Add 方法。 |
示例
以下示例显示活动文档的附加模板中指定到 FileOpen 命令的所有组合键。
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
以下示例删除 Normal 模板中"Macro1"的所有按键指定方案。
Dim aKey As KeyBinding
CustomizationContext = NormalTemplate
For Each aKey In _
KeysBoundTo(KeyCategory:=wdKeyCategoryMacro, _
Command:="Macro1")
aKey.Disable
Next aKey
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。