VB编码实现合并sheet,并能按某列去除重复行
要实现的功能:两个Excel文件中sheet的列结构完全相同,以某列为主键,把sheet2的数据插到sheet1中,要保证主键唯一
我现在有两个方案:
1. 把sheet2的所有数据拷贝粘贴到sheet1的后面,然后删除主键重复的行
2. 在sheet2中先按sheet1的主键进行筛选,把sheet1中不存在的行过滤出来,然后再把这些行拷贝粘贴过去
现在拷贝粘贴的方法我已经会弄了,但是遇到了以下技术问题:
1. 删除重复行,如果用VB代码遍历实现的话,首先需要排序,我先用录制宏的办法找到了VBA中的sort方法,但该方法移植到VB中就不好用了,然后即使排了序,在遍历的话,速度也会很慢
2. 筛选功能也没搞出来,我还是用VBA录制宏的方法,找到了advancedfilter方法,但该方法也不能移植到VB中,不知道怎么回事。总是报1004错误,advancedfilter方法无效,调用方法如下
xlSheet.Range( "A1:A10 ").AdvancedFilter xlFilterInPlace, , , True
[解决办法]
最好把excel文件导入数据库,这样查询、排序、删除都很方便快捷
[解决办法]
恭喜楼主
没帮上忙 帮顶
[解决办法]
mark