Application.KeysBoundTo 属性 (Word)

返回一个 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

另请参阅

Application 对象

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。