Propiedad Application.KeyBindings (Word)

Devuelve una colección KeyBindings que representa las asignaciones de teclas personalizadas, que incluyen un código de tecla, una categoría de teclas y un comando.

Sintaxis

expresión. KeyBindings

expresión Variable que representa un objeto Application.

Ejemplo

En este ejemplo se asigna la combinación de teclas CTRL + ALT + W al comando FileClose. Esta personalización del teclado se guarda en la plantilla Normal.

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

En este ejemplo se insertan el nombre del comando y la cadena de la combinación de teclas para cada elemento de la colección KeyBindings.

Dim kbLoop As KeyBinding 
 
CustomizationContext = NormalTemplate 
For Each kbLoop In KeyBindings 
 Selection.InsertAfter kbLoop.Command & vbTab _ 
 & kbLoop.KeyString & vbCr 
 Selection.Collapse Direction:=wdCollapseEnd 
Next kbLoop

Vea también

Objeto Application

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.