Jump to content

Mostrar MSGBOX al pulsar una tecla o un atajo de teclado


Recommended Posts

Hola a todos,

 

Me gustaría que al pulsar una tecla o un atajo de teclado, se le aparezca un mensaje en un MsgBox al usuario de la aplicación ofimática.

No sé muy bien cómo plantear el problema.

Se me ocurre lo siguiente, pero no funciona:

Sub MostrarMensaje()
   If Application.OnKey Key:="{c}" Then MsgBox "Hola mundo"
End Sub

Alguien tiene una idea mejor?

 

Gracias.

Link to comment
Share on other sites

En 23/7/2021 at 18:14 , Gerson Pineda dijo:

Onkey, tiene un argumento opcional, que es llamar a un procedimiento, bueno ahi agregas el mensaje y listo

Sub MostrarMensaje()
   If Application.OnKey Key:="{c}" Then "MiSub"
End Sub

Sub MiSub()

VBA.MsgBox "Hola mundo"

End Sub

 

Saludos 

Gracias @Gerson Pineda.

Me tocará hacerlo así... Que remedio!

Link to comment
Share on other sites

×
×
  • Create New...

Important Information

Privacy Policy