请教excel中两列的文本比对问题

一、用一列来表示。C1=IF(COUNTIF(B:B,A1),"","不同")，向下复制公式。
二、用条件格式。选中A列，格式－条件格式，条件选择公式，并输入公式COUNTIF(B:B,A1)=0，“格式”按钮，选择一种字体或者背景（图案）颜色。

1.工具－－宏－录制新宏－确定。

2.在宏窗口上“停止录制”

3.工具－宏－宏,点击macro1－编辑，进入一个窗口，把里面的内容全部删除，粘贴下面代码：

Sub 高显两列中的不同数据1()
On Error GoTo MyErr
Dim MyRan As Range
Set MyRan = Selection
If MyRan.Areas.Count <> 2 Then
MsgBox "选择的不是两列", vbExclamation
Exit Sub
End If
Dim i As Integer, j As Integer, IsRept As Boolean, m As Integer, n As Integer, k As Integer
IsRept = False
Dim AllMatch As Boolean
AllMatch = True
Dim MatchNum As Integer
Dim MyStr As String
Dim MyStrTemp() As String
Dim MystrNum As Integer
For k = 1 To 2
If k = 1 Then '用于交换选中的两个区域
m = 1
n = 2
Else
m = 2
n = 1
End If

For i = 1 To MyRan.Areas(m).Rows.Count
MatchNum = 0
For j = 1 To MyRa