ExcelのVLOOKUP関数で書式が反映されない理由とその対策

ExcelでVLOOKUP関数を使っていると、「検索した値は正しいはずなのに、書式（色やフォント）が反映されない」と感じたことはありませんか？今回は、そんなお悩みを解決するために、VLOOKUP関数の仕組みや書式が反映されない理由、そしてその対策方法を初心者の方にもわかりやすく解説します。

VLOOKUP関数の基本的な仕組み
書式が反映されない理由
書式を反映させる方法
1. 条件付き書式を使用する
2. VBA（マクロ）を使用する
よくある質問や疑問
今すぐ解決したい！どうしたらいい？
まとめ

VLOOKUP関数の基本的な仕組み

Excelのイメージ

まず、VLOOKUP関数の基本的な使い方をおさらいしましょう。VLOOKUP関数は、指定した検索値を範囲内で検索し、対応する列から値を取得する関数です。書式（色やフォント）は含まれません。

例えば、以下のようなデータがあるとします。

商品コード	商品名	価格
001	リンゴ	100円
002	バナナ	150円

この場合、商品コード「001」を検索して商品名を取得するには、以下のようなVLOOKUP関数を使います。



=VLOOKUP("001", C3, 2, FALSE)

この関数は、「001」をA列で検索し、対応するB列の値（商品名）を返します。しかし、この関数では書式は反映されません。

書式が反映されない理由

VLOOKUP関数は、あくまで値を返す関数であり、セルの書式設定（色やフォントなど）は含まれません。そのため、検索した値が正しくても、書式が反映されないことがあります。

書式を反映させる方法

書式を反映させるためには、以下の方法があります。

条件付き書式を使用する

条件付き書式を使用すると、セルの値に応じて自動的に書式を変更できます。例えば、商品コードが「001」の場合にセルの背景色を変更するには、以下の手順で設定します。

商品コードのセル範囲を選択します。
「ホーム」タブの「条件付き書式」から「新しいルール」を選択します。
「セルの値が」を選択し、「等しい」を指定します。
値に「001」を入力し、書式を設定します。

これで、商品コードが「001」のセルに自動的に書式が適用されます。

VBA（マクロ）を使用する

VBAを使用すると、VLOOKUP関数で取得した値に対応するセルの書式をコピーすることができます。以下のVBAコードを使用すると、検索したセルの書式を反映させることができます。

vba

Private Sub Worksheet_Change(ByVal Target As Range)

    If Intersect(Target, Range("")) Is Nothing Then Exit Sub

    Dim lookupValue As String

    lookupValue = Target.Value

    Dim lookupRange As Range

    Set lookupRange = Range("C3")

    Dim resultCell As Range

    Set resultCell = lookupRange.Columns(1).Find(lookupValue, LookIn:=xlValues)

    If Not resultCell Is Nothing Then

        resultCell.Offset(0, 1).Copy

        Target.Offset(0, 1).PasteSpecial Paste:=xlPasteFormats

    End If

End Sub

このコードは、セルが変更されると、対応する商品名のセルの書式をコピーして、変更されたセルに貼り付けます。