Propriété Global.KeyBindings (Word)

Renvoie une collection KeyBindings qui représente les affectations de touches personnalisées.

Syntaxe

expression. KeyBindings

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

Exemple

Cet exemple montre comment affecter la combinaison de touches CTRL+ALT+W à la commande FileClose (FichierFermer). La personnalisation du clavier est enregistrée dans le modèle Normal.

CustomizationContext = NormalTemplate 
KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyControl, wdKeyAlt, _ 
 wdKeyW), KeyCategory:=wdKeyCategoryCommand, _ 
 Command:="FileClose"

Cet exemple montre comment insérer le nom de la commande et la combinaison de touches pour chaque élément dans la collection KeyBindings.

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

Voir aussi

Objet global

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.