vb新建excel，向其写入内容并保存，但是下一次新建总是覆盖上一次的内容，请问如何才能正确保存，谢谢

Question

但是，问题是，比如第一次通过Command1选出了20条记录，然后按Command2新建一个名为a.xls的excel，并将这20条记录存进去；但是下一次通过Command1选出10条记录，然后按Command2新建一个名为b.xls的 excel,将这10条记录存进去。发现b.excel的前10条记录是第二次选择得到的，但是后面还有10条，是a.xls的后10条，请问如何写代码可以做到不覆盖，每次保存的excel只有选出来的记录，谢谢

Answer 1

在Command1单击之前或Command2单击之后，缺了一个将adodc1数据区域清空重置的过程追问

你好，请问这句代码怎么写，谢谢

追答

这个，需要你自己录制个宏测试一下。毕竟我是不知道你excel表里导入数据区域的位置。以下语句仅做参考：
假设数据区域在工作表Data中A到Z列，标题行为第一行，
with sheets("Data")
.range("A2:Z" & .range("A" & rows.count).end(xlup).row ).clearcontents
end with

Answer 2

检查你的i变量使用是否正确。追问

这个检查过了，每次取出i条记录后，存进去的是i条，问题应该出现在新建excel表这儿，但是不知道具体哪儿需要修改