Question

利用Excel函数检查Excel表格中每行单元格是否有重复数据的方法

Answer 1

已知函数冒失有难度。

自定义函数

Function 重复(A As Range) As Boolean

Application.Volatile

Dim B As Range, K As Long, I As Long, KI As String

Dim D As Object

Set D = CreateObject("Scripting.Dictionary")

K = A.Row

I = Cells(K, "IV").End(xlToLeft).Column - 1

For Each B In Range(Cells(K, 1), Cells(K, I))

KI = B.Value

If KI <> "" Then

If D.Exists(KI) = True And KI <> "" Then

重复 = True

Exit Function

End If

D.Add KI, KI

End If

Next

Set D = Nothing

End Function

Answer 2

可以利用COUNTIF函数。如图选定单元格所示，如果返回的结果大于1，则说明有重复。但仍要仔细研读COUNTIF的计算规则，如是是否区分大小写、是否区分文本和数字等，以免影响计算的准确性。

Answer 3

WPS电子表格有个数据重复高亮显示的功能，数字、文字、字符都可以判断，不需要函数即可实现。

具体步骤，先选取需要判断重复的区域，如：=$A:$D，再从“数据”菜单栏，选择“高亮重复项”→“设置高亮重复项”，重复项即显示橙色底纹。

Answer 4

可以用countif行数，=COUNTIF(C3:F7,C3)，C3:F7是统计数据区域，C3是统计的对象，然后拖曳即可。

Answer 5

假定数据在A:Z列，检查结果放在AA列，在AA1输入公式：

=IF(COUNTA(A1:Z1)=SUMPRODUCT(1/COUNTIF(A1:Z1,A1:Z1)),"没","有")&"重复"
注：公式中的数据范围根据你的实际情况修改。