KeyBinding.Rebind, méthode (Word)

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

Syntaxe

expression. Rebind( _KeyCategory_ , _Command_ , _CommandParameter_ )

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

Parameters

Nom Requis/Facultatif Type de données Description
KeyCategory Obligatoire WdKeyCategory Catégorie des touches de la combinaison.
Commande Obligatoire String Nom de la commande spécifiée.
CommandParameter Facultatif Variant Texte supplémentaire, s'il y a lieu, à ajouter à la commande indiquée par l'argument Commande. Pour plus d’informations sur les valeurs de cet argument, consultez la méthode Add .

Exemple

Cet exemple montre comment réaffecter la combinaison de touches CTRL+MAJ+S à la commande FichierEnregistrerSous.

Dim kbTemp As KeyBinding 
 
CustomizationContext = NormalTemplate 
Set kbTemp = _ 
 FindKey(BuildKeyCode(wdKeyControl, wdKeyShift, wdKeyS)) 
kbTemp.Rebind KeyCategory:=wdKeyCategoryCommand, _ 
 Command:="FileSaveAs"

Cet exemple montre comment réaffecter à la macro « Macro1 » l'ensemble des touches affectées à la macro « ReportMacro ».

Dim kbLoop As KeyBinding 
 
CustomizationContext = ActiveDocument.AttachedTemplate 
For Each kbLoop In _ 
 KeysBoundTo(KeyCategory:=wdKeyCategoryMacro, _ 
 Command:="Macro1") 
 kbLoop.Rebind KeyCategory:=wdKeyCategoryMacro, _ 
 Command:="ReportMacro" 
Next kbLoop

Voir aussi

KeyBinding, objet

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.