请问EXCEL中如何从多条数据中选出相同数据,并删除该多条相同的记录,同时要保留其中一条?
发布网友
发布时间:2022-02-27 00:09
我来回答
共3个回答
热心网友
时间:2022-02-27 01:38
在E1输入公式
=IF(SUMPRODUCT((A$1:A1=A1)*(B$1:B1=B1)*(C$1:C1=C1)*(D$1:D1=D1))=1,"YES","")
下拉填充公式
再对E列自动筛选即可
热心网友
时间:2022-02-27 02:56
用vba.
alt+f11,插入个模块。
比如你的数据在a1:d5
在右边拷入代码如下.
Sub 删除重复行()
Dim arr, d As Object
Dim a As Long
a = [a65536].End(xlUp).Row
Set d = CreateObject("scripting.dictionary")
arr = Sheets("表名").Range("a1").CurrentRegion '表名改成你的表名,这样要求你中间没有空行
'arr = Sheets("表名").Range("a1:d" & a) ' 如果你中间有空行,就要用这一行
For i = 2 To UBound(arr) '
x = arr(i, 1) & "," & arr(i, 2) & "," & arr(i, 3) & "," & arr(i, 4) '假如在A,B,C,D列就是1,2,3,4
If Not d.exists(x) Then d.Add x, "" Else Sheets("表名").Rows(i).Delete
Next i
End Sub
返回excel。工具-宏-找到删除重复行()-执行
友情提示:这个执行之后不能撤销,请复制一张表测试
热心网友
时间:2022-02-27 04:31
07版excel
数据-删除重复项。。。