Excel VBAについて

質問

Sheet1の第1列の値を条件に、
Sheet2の別表から値をコピーしてきて、
Sheet1の第2列に貼り付けるにはどのようなコマンドを書けばよろしいでしょうか.

概要お願いします.

回答No.1

mt2008

WorksheetFunction.VLookup　を使います。

添付の図の場合こんな感じです。
Worksheets("Sheet1").Range("B1").Value = WorksheetFunction.VLookup(Worksheets("Sheet1").Range("A1"), Worksheets("Sheet2").Range("A1:B3"), 2, False)