KeyBindings.Add-Methode (Word)

Gibt ein KeyBinding-Objekt zurück, das eine neue Tastenkombination für ein Makro, einen integrierten Befehl, eine Schriftart, einen AutoText-Eintrag, eine Formatvorlage oder ein Symbol darstellt.

Syntax

Ausdruck. Hinzufügen (KeyCategory, Command, KeyCode, KeyCode2, CommandParameter)

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

Parameter

Name	Erforderlich/Optional	Datentyp	Beschreibung
KeyCategory	Erforderlich	WdKeyCategory	Die Kategorie der Tastenbelegung.
Befehl	Erforderlich	String	Der Befehl, der mithilfe der angegebenen Tastenkombination ausgeführt wird.
KeyCode	Erforderlich	Long	Eine Taste, die Sie mit einer der WdKey-Konstanten angeben.
KeyCode2	Optional	Variant	Eine zweite Taste, die Sie mit einer der WdKey-Konstanten angeben.
CommandParameter	Optional	Variant	Zusätzlicher Text (sofern vorhanden), der für den durch Command angegebenen Befehl erforderlich ist. Weitere Informationen finden Sie weiter unten im Abschnitt "Hinweise".

Rückgabewert

Keybinding

HinwBemerkungeneise

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

In der linken Spalte der folgenden Tabelle finden Sie die Befehle, für die ein Befehlswert erforderlich ist, und in der rechten die jeweilige Beschreibung der CommandParameter dieser Befehle. (Die Angabe der CommandParameter entspricht dem Auswählen eines Elements aus dem Listenfeld im Dialogfeld Tastatur anpassen (Menü Extras), das beim Auswählen einer der folgenden Befehle im Feld Befehle angezeigt wird.)

Einstellung für Command	Obligatorische CommandParameter
Borders, Color oder Shading	Eine Als Text angegebene Zahl, die der Position der im Listenfeld ausgewählten Einstellung entspricht, die Werte enthält, wobei 0 (null) das erste Element, 1 das zweite Element ist usw.
Columns	Eine Zahl zwischen 1 und 45 – angegeben als Text – entspricht der Anzahl der Spalten, die Sie anwenden möchten.
Condensed	Ein Textmaß zwischen 0,1 Punkt und 12,75 Punkt, das in 0,05-Punkt-Schritten angegeben wird (72 Punkt = 1 Zoll).
Expanded	Ein Textmaß zwischen 0,1 Punkt und 12,75 Punkt, das in 0,05-Punkt-Schritten angegeben wird (72 Punkt = 1 Zoll).
FileOpenFile	Der Pfad und Dateiname der zu öffnenden Datei. Wenn Sie keinen Pfad angeben, wird der aktuelle Ordner verwendet.
FontSize	Ein positives Textmaß, das in 0,5-Punkt-Schritten angegeben wird (72 Punkt = 1 Zoll).
Lowered, Raised	Ein Textmaß zwischen 1 Punkt und 64 Punkt, das in 0,5-Punkt-Schritten angegeben wird (72 Punkt = 1 Zoll).
Symbol	Eine Zeichenfolge, Chr(167) & "Symbol"die durch Verketten einer Chr()-Anweisung mit dem Namen einer Symbolschriftart (z. B. ) erstellt wird.

Beispiel

In diesem Beispiel wird dem Befehl FileClose die Tastenkombination STRG+ALT+W hinzugefügt. Die Tastaturanpassung wird in der Vorlage Normal.dot gespeichert.

CustomizationContext = NormalTemplate 
KeyBindings.Add _ 
    KeyCategory:=wdKeyCategoryCommand, _ 
    Command:="FileClose", _ 
    KeyCode:=BuildKeyCode(wdKeyControl, wdKeyAlt, wdKeyW)

In diesem Beispiel wird der Schriftart Arial die Tastenkombination ALT+F4 hinzugefügt und dann die Anzahl der Elemente in der KeyBindings-Auflistung angezeigt. Im Beispiel wird dann die Tastenkombination ALT+F4 gelöscht (die Standardeinstellung wurde zurückgegeben) und die Anzahl der Elemente in der KeyBindings-Auflistung wird erneut angezeigt.

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

In diesem Beispiel wird der Tastenkombination STRG+ALT+S der Befehl Font mit einem Schriftgrad von 8 Punkt zugewiesen.

CustomizationContext = NormalTemplate 
KeyBindings.Add KeyCategory:=wdKeyCategoryCommand, _ 
    Command:="FontSize", _ 
    KeyCode:=BuildKeyCode(wdKeyControl, wdKeyAlt, wdKeyS), _ 
    CommandParameter:="8"

In diesem Beispiel wird der Formatvorlage Heading 1 im aktiven Dokument die Tastenkombination STRG+ALT+H zugewiesen.

CustomizationContext = ActiveDocument 
KeyBindings.Add KeyCategory:=wdKeyCategoryStyle, _ 
    Command:="Heading 1", _ 
    KeyCode:=BuildKeyCode(wdKeyControl, wdKeyAlt, wdKeyH)

In diesem Beispiel wird dem AutoText-Eintrag "Hello" die Tastenkombination STRG+ALT+O zugewiesen.

CustomizationContext = ActiveDocument 
KeyBindings.Add KeyCategory:=wdKeyCategoryAutoText, _ 
    Command:="Hello", _ 
    KeyCode:=BuildKeyCode(wdKeyControl, wdKeyAlt, wdKeyO)

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.