Propriedade KeyBinding.KeyCode (Word)

Retorna um número exclusivo para a primeira chave em vinculação de teclas especificada. Long somente leitura.

Sintaxe

expression. KeyCode

Expressão Uma expressão que retorna um objeto 'KeyBinding'.

Comentários

Você pode criar esse número usando o método BuildKeyCode quando você estiver acrescentando ligações de tecla usando o método Add do objeto KeyBindings.

Exemplo

Este exemplo exibe uma mensagem se a coleção KeyBindings incluir a combinação de teclas ALT + CTRL + W.

Dim lngCode As Long 
Dim kbLoop As KeyBinding 
 
CustomizationContext = NormalTemplate 
lngCode = BuildKeyCode(wdKeyAlt, wdKeyControl, wdKeyW) 
For Each kbLoop In KeyBindings 
 If lngCode = kbLoop.KeyCode Then 
 MsgBox kbLoop.KeyString & " is already in use" 
 End If 
Next kbLoop

Confira também

Objeto KeyBinding

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.