vba找重复值并替换（VBA学习笔记删除重复值）

vba找重复值并替换（VBA学习笔记删除重复值）

就是工作表中“删除重复项”的功能，用VBA如何删除列数据中的重复项，语法：Range().RemoveDuplicates Columns Header

示例一，处理1列中的重复数据：Range("D1:D30").RemoveDuplicates Columns:=1 Header:=xlYes

示例二、 多列数据，按其中的某1列去重：Range("A1:C30").RemoveDuplicates Columns:=[B1].Column Header:=xlYes。参数columns的列要在前面Range("A1:C30")之中，如果写成数字，则是相对这个区域的列序号。上述示例语句可写成：Range("A1:C30").RemoveDuplicates Columns:=2；如果前区域定义为Range("B1:C30").RemoveDuplicates， 那B列去重，参数要写成 Columns:=1。与之前 筛选“方法”不同。

示例三、 2列重复数据去重复项：Range("F1:G30").RemoveDuplicates Columns:=Array(1 2) Header:=xlNo 列参数Columns等于一个数组值。