vba 如何比较excel两列不重复数据

2025-03-18 22:15:28
推荐回答(3个)
回答1:

你是要相同数据的并且是同行的才显示红色是吧?
可是看你贴的代码是数据不同了就把两个单元格的的字显示红色啊.
先按你贴的代码加上 是否同行的判断 贴给你 你试试吧
Dim cc
With NewDataBook.Sheets(1)
For cc = 2 To .UsedRange.Rows.Count
If .Cells(cc, 1) <> .Cells(cc, 2) And .Cells(cc, 1).Row = .Cells(cc, 2).Row Then
.Cells(cc, 1).Font.Color = vbRed
.Cells(cc, 2).Font.Color = vbRed
End If
End With
Next

回答2:

不用VBA
假定两列分居A、B列,从第二行开始
c2输入=if(countif(b:b,a2)>=1,“重复","")
下拉复制填充

回答3:

如比较A列和B列,则在C1输入=COUNTIF(A1,B1)
,相同显示1,不相同显示0,试试看,下拉拖到你所需要的地方