Compartilhar via

Objeto KeyBindings (Word)

  • Artigo

Uma coleção de objetos KeyBinding que representam as atribuições de teclas personalizadas no contexto atual. Atribuições de teclas personalizadas são feitas na caixa de diálogo Personalizar teclado.

Comentários

Use a propriedade KeyBindings para retornar a coleção KeyBindings. O exemplo a seguir insere após a seleção o nome do comando e a combinação de teclas para cada item da coleção KeyBindings.

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

Use o método Add para adicionar um objeto KeyBinding à coleção KeyBindings. O exemplo a seguir adiciona a combinação de teclas CTRL + ALT + H ao estilo Heading 1 no documento ativo.

CustomizationContext = ActiveDocument 
KeyBindings.Add KeyCategory:=wdKeyCategoryStyle, _ 
 Command:="Heading 1", _ 
 KeyCode:=BuildKeyCode(wdKeyControl, wdKeyAlt, wdKeyH)

Use KeyBindings (Index), onde Index é o número de índice, para retornar um único objeto KeyBinding. O exemplo a seguir exibe o comando associado com o primeiro objeto KeyBinding da coleção KeyBindings.

MsgBox KeyBindings(1).Command

Confira também

Referência do modelo de objeto do Word

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.