Método KeyBinding.Disable (Word)

  • Artículo

Quita la combinación de teclas especificada si está actualmente asignada a un comando. Después de utilizar este método, no se aplica la combinación de teclas.

Sintaxis

expresión. Disable

expresión obligatoria. Variable que representa un objeto 'KeyBinding'.

Comentarios

Uso de este método equivale a hacer clic en el botón Quitar en el cuadro de diálogo Personalizar teclado. Utilice el método Clear con un objeto KeyBinding para restablecer un comando integrado a su asignación de teclas predeterminada. No es necesario quitar ni agregar un objeto KeyBinding antes de agregarlo en otra parte.

Ejemplo:

En este ejemplo se quita la asignación de teclas CTRL+MAYÚS+B. Esta combinación está asignada al comando Bold de manera predeterminada.

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

En este ejemplo se asigna la combinación de teclas CTRL + MAYÚS + O al comando Organizer. A continuación, en el ejemplo se utiliza el método Disable para quitar la combinación de teclas CTRL + MAYÚS + O y muestra un mensaje.

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

En este ejemplo se quitan todas las asignaciones de teclas de la macro global "Macro1".

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

Consulte también

Objeto KeyBinding

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.