EXCEL用VBA如何实现动态录入后，另存在另一个表，每次记录按顺序累计保存在一张表内。

Question

按录入时间顺序，把第一个记录录入第一行，第二次记录录第二行，依次类推。这一行应录入姓名、身份证号等按键，如何用VBA编写，将每次录入的信息按顺充录入SHEET31表中，如果太难，可以用VBA编写另存到一个固定的工作簿中，或是在录入模板时，在打开的另一个工作簿中同时录入，最后保存就可以了。谢谢！我已无思路。请用VBA编写将每次录入信息存入此工作簿中固定的表或是另一个工作簿中的工作表，因为此表录完后，就要用清除内容的VBA清除所有的单元格录入的内容。谢谢！每次录入的信息都要按顺序存入表中的最后一行，而不是覆盖上一次的记录。

Answer 1

假设录入表为sheet1录入行为第一行，另存表为sheet31

'在sheet1插入一个按钮，按钮名称改为“另存”，指定宏：saveCon
sub saveCon()
dim lr%
lr=sheet31.range("A65536").end(xlup).row
sheet31.range(lr+1 & ":" & lr+1)=sheet1.range("1:1").value
end sub

'在sheet1再插入一个按钮，按钮名称改为“清除”，指定宏：delCon
sub delCon()
sheet1.range("A1").EntireRow.ClearContents
end sub

Answer 2

朋友 你这个很好弄的 留个联系方式
我可以帮你做个

Answer 3

联系方式？
发个模板给你试试

Answer 4

用beforesave试试，其实很简单的