VBAでVLOOKUP

が、うまくいかない。

参照範囲を可変にしたいときって、どーしたらいいのか試行錯誤していた。未解決。

WorksheetFunction.VLOOKUP("鈴木貿易",範囲,2,FALSE)

の範囲を可変にしたい。

 

範囲を変数にして、

dim C as range

set C = Workbooks("表").Sheets(1).Range("E6:F17")

だといける。でも、Range("E6:F17")が、たまに、G:Hだったりする。

変数aと変数bに列数をカウントさせて代入後、

dim C as range

set C = Workbooks("表").Sheets(1).Range(Cells(6,a),Cells(17,b))

だとNG。

範囲の取得がうまくいってないのかなぁと思って、変数Cに入れたセルの値をデバッグプリントしたら、取得できている。

時間がなくて、その都度書き換えてるけど、めんどくさい。