Classe KeyBinding - affectation de touches personnalisée (Word VBA)

La classe KeyBinding représente une affectation de touches personnalisée dans le contexte actuel.

La classe Application donne accès à la classe KeyBinding


Dim kbg as KeyBinding
Set kbg = Dim lngKeyCode As Long: lngKeyCode = 
FindKey(KeyCode:=lngKeyCode)

For Each

Voici un exemple de traitement des éléments KeyBinding dans une collection 


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

Méthodes

Clear - Supprime la combinaison de touches spécifiée de la collection KeyBindings et réaffecte à une commande prédéfinie sa clé par défaut.

Disable - Supprime la combinaison de touches spécifiée si elle est affectée à une commande.

Execute - Exécute la commande associée à la combinaison de touches spécifiée.

Rebind - Affecte à une autre commande la combinaison de touches spécifiée.

Propriétés

Command Renvoie la commande associée à la combinaison de touches spécifiée.

CommandParameter Renvoie le paramètre de commande affecté à la touche de raccourci spécifiée.

Context Renvoie un Object qui représente l'emplacement de stockage de la combinaison de touches spécifiée.

KeyCategory Renvoie le type d'élément affecté à la combinaison de touches spécifiée.

KeyCode Renvoie un numéro unique pour la première clé dans la combinaison de touches spécifiée.

KeyCode2 Renvoie un numéro unique pour la deuxième clé dans la combinaison de touches spécifiée.

KeyString Renvoie la combinaison de touches correspond aux touches spécifiées (par exemple, CTRL + MAJ + A).

Protected True si vous ne pouvez pas modifier la combinaison de touches spécifiée dans la boîte de dialogue Personnaliser le clavier.

Document - Représente un modèle de document.