Propriété KeyBinding.KeyCategory (Word)

Renvoie le type d'élément affecté à la combinaison de touches spécifiée. En lecture seule WdKeyCategory.

Syntaxe

expression. KeyCategory

expression Obligatoire. Variable qui représente un objet « KeyBinding ».

Exemple

Cet exemple montre comment afficher les touches affectées à des noms de police. Un message est affiché si aucune touche n'a été affectée à des polices.

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"

Voir aussi

KeyBinding, objet

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.