Chuck,

oops.... now that I figured out why highlighting wasn't working before I can see a boo-boo

IF TYPE("THISFORM.ActiveControl") == "O" AND UPPER(THISFORM.ActiveControl.BaseClass) == "GRID"
*-- If on an active object, and the object is the grid in myForm...
   IF INLIST(LAST(), leftarrow, rightarrow... leftclick...)
      *-- IF the last keys pressed were some of the cursor keys leftarrow, rightarrow... 
      *-- don't forget TAB, SHIFT+TAB as well...
      chucks_keypressevent() && fire the new method we created
   ENDIF
ENDIF

Notice I changed the <> to == on the first line... Sorry.