Объект KeysBoundTo (Word)
Коллекция объектов KeyBinding , назначенных команде, стилю, макросу или другому элементу в текущем контексте.
Используйте свойство KeysBoundTo , чтобы вернуть коллекцию KeysBoundTo . В следующем примере показаны сочетания клавиш, назначенные команде 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
Справочник по объектной модели Word
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.