Compartilhar via


Propriedade KeyBinding.KeyCode2 (Word)

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

Sintaxe

expression. KeyCode2

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

Exemplo

Este exemplo exibe os códigos de tecla de cada chave da coleção KeyBindings (a coleção de todas as teclas personalizadas do documento ativo).

Dim aKey As KeyBinding 
 
CustomizationContext = ActiveDocument 
For Each aKey In KeyBindings 
 If aKey.KeyCode2 <> wdNoKey Then 
 MsgBox aKey.KeyString & vbCr _ 
 & "KeyCode1 = " & aKey.KeyCode & vbCr _ 
 & "KeyCode2 = " & aKey.KeyCode2 
 Else 
 MsgBox aKey.KeyString & vbCr _ 
 & "KeyCode1 = " & aKey.KeyCode 
 End If 
Next aKey

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.