Propiedad Application.KeysBoundTo (Word)

Devuelve un objeto KeysBoundTo que representa todas las combinaciones de teclas asignadas al elemento especificado.

Sintaxis

expresión. KeysBoundTo( _KeyCategory_ , _Command_ , _CommandParameter_ )

expresión Variable que representa un objeto Application. Opcional.

Parámetros

Nombre	Obligatorio/opcional	Tipo de datos	Descripción
KeyCategory	Obligatorio	WdKeyCategory	Categoría de la combinación de teclas.
Command	Obligatorio	String	Nombre del comando.
CommandParameter	Opcional	Variant	Texto adicional, si lo hay, requerido para el comando especificado por Command. Para obtener más información, vea la sección "Comentarios" en el método Add del objeto KeyBindings.

Ejemplo:

En este ejemplo, se muestran todas las combinaciones de teclas asignadas al comando FileOpen en la plantilla adjunta al documento activo.

Dim kbLoop As KeyBinding 
Dim strOutput As String 
 
CustomizationContext = ActiveDocument.AttachedTemplate 
 
For Each kbLoop In _ 
 KeysBoundTo(KeyCategory:=wdKeyCategoryCommand, _ 
 Command:="FileOpen") 
 strOutput = strOutput & kbLoop.KeyString & vbCr 
Next kbLoop 
 
MsgBox strOutput

En este ejemplo, se eliminan todas las asignaciones de teclas en Macro1 de la plantilla Normal.

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

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.