KeyBinding.Disable-Methode (Word)

  • Artikel

Entfernt die angegebene Tastenkombination, wenn sie derzeit einem Befehl zugeordnet ist. Nach der Verwendung dieser Methode hat die Tastenkombination keine Auswirkungen mehr.

Syntax

expression. Disable

Ausdruck: Erforderlich. Eine Variable, die ein "KeyBinding"-Objekt darstellt.

HinwBemerkungeneise

Diese Methode hat dieselbe Wirkung wie das Klicken auf die Schaltfläche Entfernen im Dialogfeld Tastatur anpassen. Verwenden Sie die Clear-Methode mit einem KeyBinding-Objekt, um einen integrierten Befehl auf die Standardtastenbelegung zurückzusetzen. Es ist nicht nötig, ein KeyBinding-Objekt zu entfernen oder erneut anzubinden, bevor Sie es an anderer Stelle hinzufügen.

Beispiel

In diesem Beispiel wird die Tastenzuordnung STRG+UMSCHALT+F entfernt. Diese Tastenkombination ist standardmäßig dem Befehl Fett zugeordnet.

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

In diesem Beispiel wird die Tastenkombination STRG+UMSCHALT+O dem Befehl Organizer zugewiesen. Dann wird die Disable-Methode aufgerufen, um die Tastenkombination STRG+UMSCHALT+O zu entfernen, und eine Meldung wird angezeigt.

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

In diesem Beispiel werden alle Tastenzuordnungen aus dem globalen Makro Macro1 entfernt.

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

Siehe auch

KeyBinding-Objekt

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.