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.
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
Référence du modèle objet Word
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.