excel - Excel 列の欠損データを検索する

Question

Excel 2003 を使用しており、2 つの列を比較して、一方の列にあるデータが他方の列にないデータを見つけようとしています。

例えば：

Answer 1

VBA では、次の醜いが機能するコードを試すことができます。

Sub missing()

Dim ya As Long, yb As Long, yc As Long, alast As Long, blast As Long
Dim flag As Boolean

yc = 2
yb = 2
flag = 0
alast = Range("A65536").End(xlUp).Row
blast = Range("B65536").End(xlUp).Row

For ya = 2 To alast
flag = 0

Do While yb <= blast
    If Range("A" & ya) = Range("B" & yb) Then flag = 1
    yb = yb + 1
    Loop

    If flag = 0 Then
        Range("C" & yc) = Range("A" & ya)
        yc = yc + 1
    End If

    yb = 2

Next ya

End Sub