1、在全局代码中顶一个全局变量：
Public myTable As String
2、在所有的CellButtonClick事件代码的前面加上一行：
myTable = e.Table.Name
'接原来的代码
3、将这行：
dr1 = Tables("CurrentTable").AddNew
改为：
dr1 = Tables(MyTable).AddNew
加好友 
发短信
Post By：2012/9/3 16:33:00 [显示全部帖子]
