Application KeysBoundTo (KeyBinding) |
该对象为由 KeyBinding 对象组成的集合,这些元素对象为当前上下文中一个命令、样式、宏或其他项目。
可用 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