Question

EXCEL工作表中有很多重复的数字，如何把这些重复的删除或隐藏，只剩下唯一的一个？

在一个EXCEL工作表中有很多重复的数字、文字、符号等。(数字、文字、符号等不在同一个单元格）如何把这些重复的删除或隐藏，只剩下唯一的一个？

A列 B列
104999200100 变压器线圈BK-150
104999200100 变压器线圈BK-150
104999200100 变压器线圈BK-150
104999200100 变压器线圈BK-150
104999200110 变压器线圈BK-1500
104999200130 变压器线圈BK-200
104999200130 变压器线圈BK-200
104999200130 变压器线圈BK-200
104999200130 变压器线圈BK-200
104999200130 变压器线圈BK-200
104999200130 变压器线圈BK-200

如以上，能不能最终的结果是一一对应的：
A列 B列
104999200100 变压器线圈BK-150
104999200110 变压器线圈BK-1500
104999200130 变压器线圈BK-200
A 列是104999200100象这些一连串的数字，B列是变压器线圈BK-150

我想只剩下一个，不是都不想要。数据很大，一个工作表也放不下，有没简单点的，快速点的？

Answer 1

筛选替换只适合用于少量的数据,公式和代码才可行,发个循环宏的代码给你,很快就能搞定,不过我问一句,哪来的这么多重复数据?一个表6万多行啊。
按ALT+F11,插入模块,粘贴运行代码,运行前请备份,防止意外。
Sub data_del()
x = 2 '从第二行开始
y = x + 1
Do While Cells(x, 1).Value <> ""
Do While Cells(y, 1).Value <> ""
If (Cells(x, 1).Value = Cells(y, 1).Value) And (Cells(x, 2).Value = Cells(y, 2).Value) Then
Cells(y, 1).EntireRow.Delete
Else
y = y + 1
End If
Loop
x = x + 1
y = x + 1
Loop
End Sub
代码已调试,没问题,但是请备份,这是好的习惯。

Answer 2

1、选中所有数据，先按A升序排序
2、C2输入公式 =if(and(a2=a1,b1=b2),0,1)
3、向下复制C列公式
4、将C列选中、复制、选择性粘贴、数值
5、再按C列排序
6、删除C列中为0的，剩下的就是唯一的数据了

事先先做备份:)

Answer 3

先选中A列,然后选中"数据"按钮中的"数据筛选"项,这时A列的最上面一行出现一个下拉箭头,点之,所有项会出现,选中其中一个,所有相同的就会一起出现,只留一个,删除全部其它行即可.
更简单的方法一时还想不到, 这个应该还是比较稳妥的.

Answer 4

1 数据排序，手工删除一样的数据行
2 做个宏进行循环比较，把相同的删除

Answer 5

自动筛选，把那个编码选出来的保留一个，其余全部删掉，这个简单
当然，你的编码也不能太多