| 
    
     |  | どなたか教えてください。 下記のような表があり、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
 
 |  |