KeyBindings.Key-Methode (Word)

Gibt ein KeyBinding-Objekt zurück, das die angegebene benutzerdefinierte Tastenkombination darstellt.

Syntax

Ausdruck. Key (KeyCode, KeyCode2)

Ausdruck Eine Variable, die eine "KeyBindings"-Auflistung darstellt.

Parameter

Rückgabewert

Keybinding

HinwBemerkungeneise

Wenn diese Tastenkombination nicht vorhanden ist, gibt diese Methode Nothing zurück.

Verwenden Sie die BuildKeyCode-Methode , um das Argument KeyCode oder KeyCode2 zu erstellen.

Beispiel

In diesem Beispiel wird der Tastenkombination ALT+F4 die Schriftart Arial zugewiesen und dann die Anzahl der Elemente in der KeyBindings-Auflistung angezeigt. Anschließend werden die Tastenkombinationen gelöscht (auf ihre Standardeinstellungen zurückgesetzt), und die Anzahl der Elemente in der KeyBindings-Auflistung wird erneut angezeigt.

CustomizationContext = NormalTemplate 
KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyAlt, wdKeyF4), _ 
 KeyCategory:=wdKeyCategoryFont, Command:="Arial" 
MsgBox KeyBindings.Count & " keys in KeyBindings collection" 
KeyBindings.Key(KeyCode:=BuildKeyCode(wdKeyAlt, wdKeyF4)).Clear 
MsgBox KeyBindings.Count & " keys in KeyBindings collection"

In diesem Beispiel wird dem Makro "Macro1" im aktiven Dokument die Tastenkombination STRG+UMSCHALT+U zugewiesen. Im Beispiel wird die Key-Eigenschaft verwendet, um ein KeyBinding-Objekt zurückzugeben, damit Word den Befehlsnamen abrufen und anzeigen kann.

CustomizationContext = ActiveDocument 
KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyControl, _ 
 wdKeyShift, wdKeyU), KeyCategory:=wdKeyCategoryMacro, _ 
 Command:="Macro1" 
MsgBox KeyBindings.Key(BuildKeyCode(wdKeyControl, _ 
 wdKeyShift, wdKeyU)).Command

In diesem Beispiel wird ermittelt, ob die Tastenkombination STRG+UMSCHALT+A Teil der KeyBindings-Auflistung ist.

Dim kbTemp As KeyBinding 
 
CustomizationContext = NormalTemplate 
Set kbTemp = KeyBindings.Key(BuildKeyCode(wdKeyControl, _ 
 wdKeyShift,wdKeyA)) 
If (kbTemp Is Nothing) Then MsgBox _ 
 "Key is not in the KeyBindings collection"

Siehe auch

KeyBindings-Auflistung (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.