Excel 中如何删除部分重复的行!!!

Question

几万条的信息~~~~
我选过高级筛选过滤我的重复行~~~~
但是这次不行,因为重复的行列中有部分不同!大部分是相同的!!
就因为这个部分值不同倒置了Excel无法自动删除重复行!!!当列筛选就容易错位!!!
举个例子说明吧:
例如:
一个Excel表内容如下:
A列 B列 C列
1111 2222 3333
1111 1111 3333
2222 3333 4444
2222 3333 5555

A列不能重复!以A列为主要!删除该行!
要求运行结果如下:
A列 B列 C列
1111 2222 3333
2222 3333 4444

或 1111 1111 3333
2222 3333 5555
等...只要A列不能重复!
三楼同志!!!不是说了!!就几万条信息嘛!!!!
还是没仔细看我的问!!!汗!!!!去别的地方求救了!!!

Answer 1

试下下面的代码看成不成?
刚刚编的,我试了好像可以.
Sub mine()
Dim a
bt = "试一下"
a = InputBox("请输入你要删除重复记录的列", bt)

Cells.Select
Selection.Sort Key1:=Range(a & "1"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, SortMethod _
:=xlPinYin, DataOption1:=xlSortNormal
Dim b As Long
b = 1
1 If Range(a & b) = "" Then

MsgBox a & "列的重复数值已清除完了!", vbInformation, bt
Exit Sub
Else
b = b + 1
If Range(a & b) = Range(a & b - 1) Then
Rows(b).Delete
b = b – 1’因为上面删了一行,所以少了一行,此处要退一行,否则会漏掉一行
Else
End If
GoTo 1

End If

End Sub

Answer 2

按A列排序，然后手动删除。

Answer 3

qinqh_yl讲的办法我试了真的很好

Answer 4

越说越糊涂