>-----Original Message-----
>I want to take some action based on user keystroke.
>I tried this on selection change and it did not trigger
>when I hit enter.  

>Private Sub Worksheet_SelectionChange(ByVal Target As
>Range)
>   Application.OnKey "^{RETURN}", "ReturnProc_A"
>End Sub

>Sub ReturnProc_A()
>  msgbox("You hit ENTER")
>End Sub

>.