我有三列A,B,C。所有都有电子邮件ID,现在我想匹配列A中的电子邮件ID与列B和列C以及之后列出唯一的电子邮件ID,这些电子邮件ID仅在列A中但不在重复列中。 请帮忙。
答案 0 :(得分:1)
我不确定我是否理解这些问题,但根据我的理解,这可能有效。 如果不是你想要的话,请告诉我
Sub LIST_UNIQUE_EMAILS()
RECORD_COUNT = Range("A" & Rows.Count).End(xlUp).Row
For Each EMAIL In Range("A1:A" & RECORD_COUNT).Value
If WorksheetFunction.CountIf(Columns("B:C"), EMAIL) = 0 Then
i = i + 1
Range("D" & i) = EMAIL
End If
Next EMAIL
End Sub
以上代码会将唯一的电子邮件写入列" D"