|
どなたか教えてください。
下記のような表があり、Sheet1のA列(品番)をキーとし、それに対応するSheet2のB列(担当)をSheet1のC列に表示させたところ、エクセル2003では正常に作動しました。ところが、エクセル97、2000ではエラー(型が一致しません。)になってしまいます。マクロ初心者の私には原因がわかりません。
尚、#N/Aを消すまたは表示しないようにするにはどうすればよいでしょうか?
Sheet1 Sheet2
A B C A B C
品番 数量 品番 担当
a 2 c 山田
b 5 e 鈴木
c 10 a 佐藤
d 20 f 内田
. .
. .
. .
Sub test()
Dim i As Integer '
Dim n As Integer '行
Dim 範囲 As Variant '列
n = Sheets("Sheet1").Range("A65536").End(xlUp).Row
範囲 = Worksheets("Sheet2").Columns("A:B")
For i = 1 To n
Worksheets("Sheet1").Select
Range("C" & i).Value = Application.VLOOKUP((Range("A" & i)), 範囲, 2, 0) ' ← 97、2000でのエラー箇所
Next i
End Sub
|
|