如何用VBA删除excel中某一列中的所有重复项，只留下没有重复项的行？
如何用VBA删除excel中某一列中的所有重复项，只留下没有重复项的行？
提问于 2019-06-21 01:39:01
我正在尝试从Excel中的一列数字中删除所有重复的值。我希望剩余的列只包含来自原始表的唯一值。
我尝试过使用RemoveDuplicates方法，但它只删除了副本的一个实例，而不是所有副本。
我也尝试过使用以下代码，但它存在与RemoveDuplicates相同的问题。我不知道为什么，因为“唯一”标签被设置为"True“。
{MYWORKSHEET]AdvancedFilter Action:= _
xlFilterCopy, CopyToRange:=[MYWORKSHEET].Range("B1"), Unique:=True我只找到了一种理论上可行的解决方案，那就是使用嵌套的For循环来迭代每一行，并检查它是否等同于表中的任何其他行。唯一的问题是，这会使我机器上的Excel崩溃，因为它必须进行大量的循环。除了这种暴力方法之外，还有其他方法可以做到这一点吗？
|-------| |----------------| |-------------------|
| INPUT | | DESIRED OUTPUT | | WHAT I DONT WANT |
|-------| |----------------| |-------------------|
| 11111 | | 11111 | | 11111 |
|-------| |----------------| |-------------------|
| 22222 | | 55555 | | 22222 |
|-------| |----------------| |-------------------|
| 33333 | | 33333 |
|-------| |-------------------|
| 22222 | | 55555 |
|-------| |-------------------|
| 33333 |
|-------|
| 55555 |
|-------|页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/56691284
复制相关文章
相似问题