Thanks Ed - it worked. One question - Why are the two dots required after the macro? Also I generalized your reply and David's and got the following generic (so far) right click routine for those who are interested.
LPARAMETERS nKeyCode, nShiftAltCtrl
LOCAL cControlName
IF ( nKeyCode = 93 )
* provide Shift+F10 shortcut menu activation
IF UPPER(_screen.activeform.activecontrol.baseclass) == "GRID"
cControlName = _screen.activeform.activecontrol.columns(_screen.activeform.activecontrol.activecolumn).currentcontrol
_screen.activeform.activecontrol.columns(_screen.activeform.activecontrol.activecolumn).&cControlName..rightclick()
ELSE
_screen.activeform.activecontrol.RightClick()
ENDIF
NODEFAULT
ENDIF
***************************
Bruce Gilmour
"Two things are infinite, the Universe and human stupidity. And I am not sure about the Universe."
- Albert Einstein