OnKey Method

[Tha BeatMaker]

I need help with the onkey method. I can not get it to work.

I have created a userform, label and macro named UserForm1, lblPress, and Functest respectively. Here is my code. What am I doing wrong?

Private Sub UserForm_Initialize()
Application.OnKey "{F10}", "functest"
End Sub
----------------------------------------------------------------------
Private Sub UserForm_Terminate()
Application.OnKey "{F10}"
End Sub
----------------------------------------------------------------------
Sub functest()
Const conMsg As String = "You have pressed F10"

lblPress.Caption = conMsg

End Sub

[Gary's Student]

Its hard to advise here, but:

1. make sure your stuff is in the ThisWorkbook module
2. you might need private sub workbook_open() to do the initialization
--
Gary's Student


"Tha BeatMaker" wrote:

>
> I need help with the onkey method. I can not get it to work.
>
> I have created a userform, label and macro named UserForm1, lblPress,
> and Functest respectively. Here is my code. What am I doing wrong?
>
> Private Sub UserForm_Initialize()
> Application.OnKey "{F10}", "functest"
> End Sub
> ----------------------------------------------------------------------
> Private Sub UserForm_Terminate()
> Application.OnKey "{F10}"
> End Sub
> ----------------------------------------------------------------------
> Sub functest()
> Const conMsg As String = "You have pressed F10"
>
> lblPress.Caption = conMsg
>
> End Sub
>
>
> --
> Tha BeatMaker
> ------------------------------------------------------------------------
> Tha BeatMaker's Profile: http://www.excelforum.com/member.php...o&userid=23998
> View this thread: http://www.excelforum.com/showthread...hreadid=397499
>
>