Propriété KeyBinding.KeyCode (Word)

Renvoie un numéro unique pour la première clé dans la combinaison de touches spécifiée. Long (en lecture seule).

Syntaxe

expression. KeyCode

Expression Expression qui renvoie un objet « KeyBinding ».

Remarques

Ce numéro est créé à l'aide de la méthode BuildKeyCode lorsque vous ajoutez des combinaisons de touches à l'aide de la méthode Add de l'objet KeyBindings.

Exemple

Cet exemple montre comment affiche un message si la collection KeyBindings contient la combinaison de touches 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

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.