Comprar a Coleção de 15.000 Macros, Funções e Fórmulas do Excel        Dicas


Pergunta:
Quero acionar uma Rotina em VBA usando as teclas Alt + a
Isso é possível ?

Resposta:
Sim, é possível. Na rotina Trap( ) você deve indicar que combinação de teclas usará para acionar "ExecutoARotinaOK"

Transcreva as rotinas abaixo e na Planilha (Sheet1) por exemplo

acione Alt + a

(Mantendo a tecla Alt calcada, acione a tecla a)

Sub Trap( )
Worksheets(1).Select
Application.OnKey "%a", "ExecutoARotinaOK"
End Sub

Sub ExecutoARotinaOK( )

MsgBox "OK"
End Sub