KeyBinding.Disable, méthode (Word)

  • Article

Supprime la combinaison de touches spécifiée si elle est affectée à une commande. Après avoir utilisé cette méthode, cette combinaison de touches n'a plus d'effet.

Syntaxe

expression. Disable

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

Remarques

À l'aide de cette méthode équivaut à cliquer sur le bouton Supprimer dans la boîte de dialogue Personnaliser le clavier. Utilisez la méthode Clear avec un objet KeyBinding pour réinitialiser une commande prédéfinie sa touche par défaut à. Vous n'avez pas besoin de supprimer ou de relier un objet KeyBinding avant de l'ajouter ailleurs.

Exemple

Cet exemple montre comment supprimer l’affectation de touches Ctrl+Maj+B. Cette combinaison de touches est affectée à la commande Bold par défaut.

CustomizationContext = NormalTemplate 
FindKey(BuildKeyCode(wdKeyControl, wdKeyShift, wdKeyB)).Disable

Cet exemple montre comment affecte la combinaison de touches CTRL + MAJ + O à la commande Organiser. Ensuite, l'exemple utilise la méthode Disable pour supprimer la combinaison de touches CTRL + MAJ + O et affiche un message.

CustomizationContext = NormalTemplate 
KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyO, _ 
 wdKeyControl, wdKeyShift), _ 
 KeyCategory:=wdKeyCategoryCommand, Command:="Organizer" 
With FindKey(BuildKeyCode(wdKeyO, wdKeyControl, wdKeyShift)) 
 MsgBox .Command & " is assigned to CTRL+Shift+O" 
 .Disable 
 If .Command = "" Then MsgBox _ 
 "Nothing is assigned to CTRL+Shift+O" 
End With

Cet exemple montre comment supprimer toutes les affectations de touches associées à la macro globale « Macro1 ».

Dim kbLoop As KeyBinding 
 
CustomizationContext = NormalTemplate 
For Each kbLoop In KeysBoundTo _ 
 (KeyCategory:=wdKeyCategoryMacro, Command:="Macro1") 
 kbLoop.Disable 
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.