基于多列删除表中的重复项答案

【问题标题】：Remove Duplicates in Table Based on Multiple Column基于多列删除表中的重复项
【发布时间】：2018-12-27 16:53:12
【问题描述】：

您好，我想比较表中的 2 列，如果两列相同，请删除重复项。

我只用了 1 列，但不知道如何在代码中比较 2：

Sheets("A").ListObjects("Data").Range.RemoveDuplicates Columns:=Array(1), Header:=xlYes

【问题讨论】：

【解决方案1】：

要合并这两列，您必须将两组数据捕获为一个数组。这适用于删除任何数据集范围或表上的重复项，以及如果您想过滤多个成员。

在您的情况下，由于您希望评估表中的第二列和第三列，您可以轻松地将代码重写为：

Sheets("A").ListObjects("Data").Range.RemoveDuplicates Columns:=Array(2,3), Header:=xlYes

【讨论】：

【解决方案2】：

如果您的数据范围称为“数据”，则代码应为：
ActiveSheet.Range("data").RemoveDuplicates Columns:=Array(1, 2), Header:=xlYes

【讨论】：