Partager via


Objet KeyBindings (Word)

Collection d'objets KeyBinding qui représentent les affectations de touches personnalisées dans le contexte actuel. Effectuez ces affectations dans la boîte de dialogue Personnaliser le clavier.

Remarques

Utilisez la propriété KeyBindings pour renvoyer la collection KeyBindings. L'exemple suivant insère après la sélection du nom de la commande et la combinaison de touches pour chaque élément dans la collection KeyBindings.

CustomizationContext = NormalTemplate 
For Each aKey In KeyBindings 
 Selection.InsertAfter aKey.Command & vbTab _ 
 & aKey.KeyString & vbCr 
 Selection.Collapse Direction:=wdCollapseEnd 
Next aKey

Utilisez la méthode Add pour ajouter un objet KeyBinding à la collection KeyBindings. L'exemple suivant ajoute la combinaison de touches CTRL + ALT + H au style Heading 1 dans le document actif.

CustomizationContext = ActiveDocument 
KeyBindings.Add KeyCategory:=wdKeyCategoryStyle, _ 
 Command:="Heading 1", _ 
 KeyCode:=BuildKeyCode(wdKeyControl, wdKeyAlt, wdKeyH)

Utilisez KeyBindings (Index), où Index est le numéro d'index, pour renvoyer un seul objet KeyBinding. L'exemple suivant affiche la commande associée au premier objet KeyBinding dans la collection KeyBindings.

MsgBox KeyBindings(1).Command

Voir aussi

Référence du modèle objet Word

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.