Asignar método de teclado abreviado a macro en Excel

En Excel podemos asignar una macro a un método de teclado abreviado de dos maneras. Partimos de la siguiente macro a la que asignaremos un atajo (método de teclado abreviado).

Sub Macro1()
'Ejemplo:
  MsgBox "Funciona"
End Sub

Cuadro de diálogo Macro

1. Si no dispones de las ficha Programador visita esta página.
2. En la ficha Programador, en el grupo Código, haga clic en Macros.
3. Selecciona la macro y clic sobre Opciones.
4. Teclea la letra deseada. Para emplear mayúsculas, presiona simultáneamente Mayús y la letra.

Más rápido aún:

1. Presionar Alt + F8 y clic en Opciones.
2. Teclea la letra deseada. Para emplear mayúsculas, presiona simultáneamente Mayús y la letra.

Programáticamente con VBA

El siguiente código asigna Ctrl+Mayús+U a la macro anterior.

Sub AsignaAtajo()
 Application.OnKey "^+u", "Macro1"
End Sub

El siguiente código inhabilita la secuencia Ctrl+Mayús+U.

Sub AsignaAtajo()
 Application.OnKey "^+u", ""
End Sub

Referencias:
Método Application.OnKey (Excel) Para especificar caracteres que no están visibles al presionar la tecla, por ejemplo, TAB (tabulador), utilice los códigos que se muestran en la siguiente tabla. Cada código de la tabla representa una tecla del teclado: