Propriedade KeyBinding.KeyCategory (Word)

Retorna o tipo do item atribuído ao acoplamento de teclas especificado. Somente leitura WdKeyCategory.

Sintaxe

expression. KeyCategory

expression é obrigatório. Uma variável que representa um objeto 'KeyBinding'.

Exemplo

Este exemplo exibe as teclas atribuídas a nomes de fonte. Uma mensagem será exibida se nenhuma tecla tiver sido atribuída a fontes.

Dim kbLoop As KeyBinding 
Dim intCount As Integer 
 
intCount = 0 
 
For Each kbLoop In KeyBindings 
 If kbLoop.KeyCategory = wdKeyCategoryFont Then 
 intCount = intCount + 1 
 MsgBox kbLoop.Command & vbCr & kbLoop.KeyString 
 End If 
Next kbLoop 
 
If intCount = 0 Then _ 
 MsgBox "Keys haven't been assigned to fonts"

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.