KeysBoundTo 集合对象

         
Application
KeysBoundTo (KeyBinding)

该对象为由 KeyBinding 对象组成的集合,这些元素对象为当前上下文中一个命令、样式、宏或其他项目。

使用 KeysBoundTo 集合

可用 KeysBoundTo 属性返回 KeysBoundTo 集合。下例显示对应于 Normal 模板中“FileNew”命令的组合键。

CustomizationContext = NormalTemplate
For Each myKey In KeysBoundTo(KeyCategory:=wdKeyCategoryCommand, _
    Command:="FileNew")
    myStr = myStr & myKey.KeyString & vbCr
Next myKey
MsgBox myStr

下列示例显示保存命名为“Macro1”的宏键的文档或模板名称。

Set kb = KeysBoundTo(KeyCategory:=wdKeyCategoryMacro, _
    Command:="Macro1")
MsgBox kb.Context.Name