你可以导入系统菜单,然后隐藏你不需要的菜单
http://www.foxtable.com/webhelp/scr/1079.htm
直接写代码隐藏,也可以,如
ContextMenus("Cell").Items("RowMenu").visible = falseContextMenus("Cell").Items("ColMenu").visible = False