Поделиться через


Свойство Application.KeyBindings (Word)

Возвращает коллекцию KeyBindings , представляющую настраиваемые назначения ключей, включая код ключа, категорию ключа и команду.

Синтаксис

выражение. KeyBindings

выражение: переменная, представляющая объект Application.

Пример

В этом примере сочетание клавиш CTRL+ALT+W назначается команде FileClose . Эта настройка клавиатуры сохраняется в шаблоне Обычный.

CustomizationContext = NormalTemplate 
KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyControl, wdKeyAlt, _ 
 wdKeyW), KeyCategory:=wdKeyCategoryCommand, _ 
 Command:="FileClose"

В этом примере вставляется имя команды и строка сочетания клавиш для каждого элемента в коллекции KeyBindings.

Dim kbLoop As KeyBinding 
 
CustomizationContext = NormalTemplate 
For Each kbLoop In KeyBindings 
 Selection.InsertAfter kbLoop.Command & vbTab _ 
 & kbLoop.KeyString & vbCr 
 Selection.Collapse Direction:=wdCollapseEnd 
Next kbLoop

См. также

Объект Application

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.