Adding Hotkey to Macro with Code?

**Neg0r** · 12-06-2010, 11:24 AM

Hello again

I have another problem.
I have a macro that creates excel-files and it also adds a small amount of VBA-code to those new files (just a simple subroutine that opens a subroutine of an addin).
Now it would be helpful, when this subroutine would have an automatically assigned hotkey.

So my question:
Is there any workaround to place a macro with VBA in a new workbook that has automatically assigned a hotkey to it?

I guess not :] - but if you have any ideas how to do that: bring it on! :D

**snb** · 12-06-2010, 11:49 AM

Not a workaround (around what ?), just normal code.

**Neg0r** · 12-06-2010, 12:06 PM

Ok, and how does this code look like?

Somehow like that?

With Application
.OnKey Key:="Shift+K", Procedure:="test"

...but where do I have to place that then ? - Somewhere in the OpenWorkbook Method?

edit:
ok, when I do that:

Private Sub Workbook_Open()
Application.OnKey "+^{m}", "test"
End Sub

it seems to work!!

But how do I write this Code automatically with VBA in the openworkbook method? I only managed to write code in a code modul :/

**Neg0r** · 12-06-2010, 07:01 PM

Ok, I managed it . Thanks anyway

**s970022** · 01-12-2011, 07:35 AM

I am writing a test code in ThisWorkbook module

Sub Workbook_Open()
Application.OnKey "{m}", "test"
End Sub

Sub test()
MsgBox "Done"
End Sub

However when I reopen the file again and click the "m" button, it prompted up an error message that "The Macro "D:\Mymacro.xls'!test' can not be found.". But the procedure is just underneath. What's going on?
I checked the Security level is set to low. Everything seems in the proper settings.

**romperstomper** · 01-12-2011, 07:42 AM

Your post does not comply with Rule 2 of our Forum RULES. Don't post a question in the thread of another member -- start your own thread. If you feel it's particularly relevant, provide a link to the other thread.