Propriété Application.KeysBoundTo (Word)

  • Article

Renvoie un objet KeysBoundTo qui représente toutes les combinaisons de touches affectées à l'élément spécifié.

Syntaxe

expression. KeysBoundTo( _KeyCategory_ , _Command_ , _CommandParameter_ )

expressionUne variable qui représente un objetApplication. Facultatif.

Paramètres

Nom Requis/Facultatif Type de données Description
KeyCategory Obligatoire WdKeyCategory Catégorie de la combinaison de touches.
Command Obligatoire Chaîne Nom de la commande.
CommandParameter Facultatif Variant Texte supplémentaire, le cas échéant, requis pour la commande spécifiée par la commande. Pour plus d'informations, voir la section « Remarques » dans la méthode Add de l'objet KeyBindings.

Exemple

Cet exemple montre comment afficher toutes les combinaisons de touches affectées à la commande FileOpen (FichierOuvrir) dans le modèle attaché au document actif.

Dim kbLoop As KeyBinding 
Dim strOutput As String 
 
CustomizationContext = ActiveDocument.AttachedTemplate 
 
For Each kbLoop In _ 
 KeysBoundTo(KeyCategory:=wdKeyCategoryCommand, _ 
 Command:="FileOpen") 
 strOutput = strOutput & kbLoop.KeyString & vbCr 
Next kbLoop 
 
MsgBox strOutput

Cet exemple montre comment supprimer dans le modèle Normal toutes les affectations de touches de la macro nommée « Macro1 ».

Dim aKey As KeyBinding 
 
CustomizationContext = NormalTemplate 
For Each aKey In _ 
 KeysBoundTo(KeyCategory:=wdKeyCategoryMacro, _ 
 Command:="Macro1") 
 aKey.Disable 
Next aKey

Voir aussi

Objet Application

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.