在excel表中,比较B列和A列的数据,把B列中与A列不相同的数据在C列表示出来。
来源:百度知道 编辑:UC知道 时间:2024/05/21 06:24:57
222
333
444
555
B列的数据是:666
333
789
111
C列输出的结果应该是:333
111
希望大家最好用编个宏来执行,不过其它的方法也行。
你的举例应该是查找相同的数据八。
试试这两个宏,一个是查找相同的,另一个是查找不同的,第一行为标题栏,第二行开始是数据,处理从第二行开始,在代码里面已把B列重复的数据排除了。
Sub 查找相同数据并输出()
Dim i As Long
Range(Cells(2, 3), Cells(65536, 3)).ClearContents
For i = 2 To Range("B65536").End(xlUp).Row
If Application.WorksheetFunction.CountIf(Range("A:A"), Range("B" & i)) > 0 And Application.WorksheetFunction.CountIf(Range(Cells(2, 2), Cells(i, 2)), Range("B" & i)) < 2 Then
Range("C" & Range("C65536").End(xlUp).Row + 1) = Range("B" & i)
End If
Next i
End Sub
Sub 查找不同数据并输出()
Dim i As Long
Range(Cells(2, 3), Cells(65536, 3)).ClearContents
For i = 2 To Range("B65536").End(xlUp).Row
If Application.WorksheetFunction.CountIf(Range("A:A"), Range("B" & i)) < 1 And Application.WorksheetFunction.CountIf(Range(Cells(2, 2), Cells(i, 2)), Ra