通过窗口1中“Button1”、“Button2”两个添加按钮新增“表A”行，当点“Button1”时新增行复制“表A”上一行的“项目名称”、“客户名称”、“日期”这三列数据，当点“Button2”时新增行复制“表A”上一行的“项目名称”、“客户名称”、“型号” 这三列数据，麻烦大红袍老师给个思路？
Dim ro As Row
ro = Tables("***").Rows(Tables("***").Rows.Count -1)
Dim roNew As Row
roNew = Tables("***").AddNew
roNew("") = ro("")
在不同的按钮中赋值不同的列的内容
加好友 
发短信
Post By：2015/9/10 16:39:00 [显示全部帖子]
