首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

VB编码实现合并sheet,并能按某列去除重复行解决方案

2012-01-15 
VB编码实现合并sheet,并能按某列去除重复行要实现的功能:两个Excel文件中sheet的列结构完全相同,以某列为

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

热点排行