How do I run a macro every time key pressed

[ghrek]

Hi

I found this macro on here that runs a macro when the delete key is pressed on book opening.

What I’m trying to do if poss is to have this but to be able to have it numerous times. I.E click on delete key run macro then push delete key run another macro and so on....

Can I do this? Apologies script not highlighted but just typing on I phone.

Private Sub Workbook_Open()
Application.OnKey "{DELETE}", "MyMacro"
End Sub

 

[Michael M]

Why not put all the macro calls in the "My Macro" code, eg

Sub My Macro()
Call My 1st Macro
Call My 2nd Macro
Call My 3rd Macro
end Sub

 

[ghrek]

Did think that but i want to be able to view worksheet and compare data before moving on and thus why wait until I press button to move on.
Or do you mean putting this as separate macros within one big macro?

Application.OnKey "{DELETE}", "MyMacro"

 

[Michael M]

do you mean putting this as separate macros within one big macro?

Yes....Can't really see how you can do it any other way !!

 

[FormR]

I suppose you could use a public variable to keep track of how many times you'd pressed the button and then call the appropriate macro - something like this for example.

Public MyCounter As Long


Sub MyMacro()
Select Case MyCounter
    Case 0: Call MyMacro1
    Case 1: Call MyMacro2
    Case 2: Call MyMacro3
    Case 3: Call MyMacro4
End Select
MyCounter = MyCounter + 1
End Sub