excel - Excel VBA - 删除特定列中的重复值

Question

我有一个包含许多行 ID 的工作表。

我想知道编写 VBA 程序的最佳方法，该程序将查看一列中的值范围，并仅用出现在该范围内的唯一值替换整个范围。因此，一列 1000 个 ID 可能会减少到一列 150 个唯一 ID。我不希望此过程影响工作表中其他列中的数据。

因此，假设最初的 A 列是：

*IDs*
ID12
ID12
ID34
ID56
ID78
ID78
ID78

我希望它用新的 A 列替换该列：

*IDs*
ID12
ID34
ID56
ID78

非常感谢你。

注意：我知道如何通过几种不同的方式手动执行此操作，但我想循环并为工作表上的每个非空列执行此过程，并且列的长度不同。

Answer 1

要实现您想要的，请执行以下操作：

1. 选择要删除重复项的整个列。
2. 去丝带Data > Remove Duplicates。
3. 设置My data has headers（根据您的输入）。

你完成了。如果您想在 VBA 中执行这些步骤 - 在开始之前打开宏记录器（Excel 窗口的左下角）。