EXCEL设置筛选条件

来源：百度知道 编辑：UC知道 时间：2024/07/05 17:31:30
表格里面有一列为名称，排下来有好几千，我想把相同的名称只保留一个（删除多余的相同的），有什么方法吗？
或标注出来，表示出之前己经出现过．

这样比较简单：
点数据→筛选→高级筛选→列表区域选中“名称”列，再直接勾选“选择不重复记录”→确定。

这个简单，你可以先用数据透视，得到唯一的结果。如果再想标记是否出现过，用数据透视的结果于原来的数据vLOOKUP就行。

我有这样的vba代码，你可以参照修改，或者我帮你改
Sub test()
Dim i, j, k As Integer
Dim num1 As Variant
Worksheets("sheet1").Activate
Range("a1").Select
Do While ActiveCell.Value <> ""
ActiveCell.Offset(1, 0).Select
k = k + 1
Loop
'MsgBox k
For i = 1 To k
num1 = Worksheets("sheet1").Range("a1").Offset(i - 1, 0).Value
For j = i + 1 To k
Dim num2 As Variant
num2 = Worksheets("sheet1").Range("a1").Offset(j - 1, 0).Value
If num2 = num1 Then
If Worksheets("sheet1").Range("a1").Offset(i - 1, 2).Value <> "" Then
Worksheets("sheet1").Range("a1").Offset(j - 1, 2).Value = Worksheets("sheet1").Range("a1").Offset(i - 1, 2).Value & "," & i