関数VLOOKUPを使う

トップページ（目次）

158.関数VLOOKUPを使う

＜実行前後＞

→

Sub VLOOKUPを使う()

    Range("D4") = WorksheetFunction.VLookup("B社", Range("A1:B4"), 2, False)

End Sub

通常のVLookup関数と同じような使い方になる WorksheetFunction.VLookup(検索値, 検索範囲, 何列目, 完全一致か近似値(0=False or 1=True)) 検索値と検索範囲を変数に入れるようにすれば、より柔軟なVBAになる

Sub VLOOKUPを使う_検索値と検索範囲を変数()

    検索値 = Range("D2")
    
    Set 検索範囲 = Range("A1:B4")
    
    検索結果 = WorksheetFunction.VLookup(検索値, 検索範囲, 2, False)
    
    Range("D4") = 検索結果

End Sub