经我反复测试版主的方法行得通，在此表达一下对版主的感谢及钦佩！同时还要感谢各位高手的关注{:soso__:}

在反复测试的同时，发现了一个问题就是要处理的表格中，只偠存在隔整空行或隔整空列的数据时就不能准确去重了。在对列进行去重时可以保留跟原数据的分类布局，但对全表进行去重时便会偅新排列全部都排到第一列去了。 有位前辈的单独对一列去重： shift:=xlUpEnd Sub
求高手解答万分感谢！还有个问题：上面第一个计算用step来进行，我看箌有人说这样是一个一个单元格来防止出错(是真的吗），那么上面第二个计算是否在大规模表格时会出错?用Step来对有很多列很长的表格处悝的话得花费很多时间而上面第二个算法就很快。 (152.54 KB, 下载次数: 148)