将A、B两列姓名(各1000多名,两列姓名的数量相等)对比找出B列有A列没有的姓名,并在C1单元格中显示B列有A列没有的姓名(实际不重复的只有一名),请各位帮忙解决,VBA和函数都行。不胜感激!
------最佳解决方案--------------------------------------------------------
Sub distinct()
Dim d As Object, i&, ar
Set d = CreateObject("scripting.dictionary")
ar = [a2].CurrentRegion
For i = 1 To UBound(ar)
d(ar(i, 1)) = ""
Next
For i = 1 To UBound(ar)
If Not d.exists(ar(i, 2)) Then
[d1] = ar(i, 2)
Exit For
End If
Next
End Sub
------其他解决方案--------------------------------------------------------
vlookup,数透都可。