如何在Excel中一列相同的情况下 保留另一列中不重复的选项？

Question

举个例子。号码 等级10001 A10001 A10001 B10001 B230009 A230009 B230009 B98765 D98765 A98765 A512342 F512342 F875551 C875551 C875551 C875551 G12351 S12351 S12351 D12351 D10001这一组，实际上有4列，需要提取出等级A和B两列，其他删除。230009这一组，也是提取出A和B两列，其他删除。98765这一组，提取出D, A两列，多余的删除。最后一组，12351只提取出S,D两列，其他删除。我这里涉及到几十万组数据，需要将A列数据中对应的B列的重复等级删掉。也就是说同一个产品号码在B列的等级都是不重复的，但是不同产品号码在B列的等级可以是重复的。比如10001和230009都有等级A。以上的只是一个演示，由于数据量较大，筛选后可能会出现遗漏或者数据不全的情况，提醒一下。先谢过各位！

Answer 1

我用一个较为简单易懂的方法给你解决。主要是增加一列辅助列，将辅助列去重复后分列即可。见下图：

追问

谢谢！我最后也是用去重的方法做的。如果我把几万条数据按照顺序排列，然后再直接选去重，可以吗？按照两列去重，谢谢！

追答

可以的，当然方法很多，比如用数据透视表也可以。2007以上版本其实都可以不用我加的辅助列照样可以实现去重效果的。

追问

嗯，但是就是怕数据量大，用自带的去重会有又遗漏。我是先排序再去重的，不知道会不会有漏网之鱼。以前遇到过这种情况，数据量大，如果不排序筛选的话会有遗漏。

追答

应该不会遗漏滴。祝你成功！

Answer 2

excel07及以上版本自带就有这个功能啊，只要选中这两列，点选项卡里的“数据”，里面就有一个“删除重复项”，点一下，出来的对话框确保两列的打上勾了，确定就好了。

追问

我自己钻研了一下，最后就用的这个方法。但是因为有几十万条数据，不知道会不会有遗漏或者问题。我是先排序，再去重的。

Answer 3

这个可以使用数据透视表来实现
你试试看

追问

可以具体一点吗? 给个演示什么的，数据透析表我用了，达不到我要的效果。而且这里有几十万条数据。。。

可以具体一点吗? 给个演示什么的，数据透析表我用了，达不到我要的效果。而且这里有几十万条数据。。。

追答

你看看是这样效果不？

追问

不是这样的，我是要去除掉一些列，数据透析表这种做不到，我试过了。

我要的效果是这样的，去掉所有黄色部分。

追答

那可以利用VBA，Alt+F11，在这个工作表中，输入如下代码：
Sub m()
Application.ScreenUpdating = False
Set dic = CreateObject("scripting.dictionary")
For i = Range("A65536").End(3).Row To 1 Step -1
If dic.exists(Cells(i, "A") & Cells(i, "B")) Then
Rows(i).Delete
Else
dic(Cells(i, "A") & Cells(i, "B")) = ""
End If
Next i
Application.ScreenUpdating = True
End Sub
F5执行代码即可，先备份数据，再运行，放置出错无法恢复的！！！

追问

哇，看起来好厉害。。。但是小白我不会用VBA呢。。。还有其他简单点的方法不？