条件に一致したセルを繰り返し探してVBAで文字色を変える方法

表の中で特定の値を目立たせるために色を変更したいと思った事ありませんか？

Excel-VBAを使えば、一瞬で見つけ出して目立つように色を変更することができるFont.ColorIndexと条件分岐のIFステートメント、さらに繰り返し処理を行うFor～Nextを組み合わせた方法ご紹介します。

条件により文字色を変更

Excel-VBAを使わずに表の中で条件に合ったセルの値の文字色を変更することもでき、ワークシート上で【ホーム】➡【条件付き書式】➡【新しいルール】で条件設定したい全てのセルに設定できますが、複数となるとめんどくさいし大変ですよね。

そこでExcel-VBAを使って、ユーザーフォームに配置したコマンドボタンにVBAコードを書きこんでおけば、ボタン1回押すだけでできるので効率的ですし簡単です。

波乗りアヒル

ただ単に文字色を指定するならばColorIndexでしたいセル番号を書けばいいのですが、それだけならば、下記ページに詳細を書いてあるので、ここでは省略します。

色見本付き

同じ点数のセルを見つけたらエクセルVBAでラベルの色を変える方法 コピペOK！ユーザーフォームに配置しているラベル（Label）の色を初期設定の黒色ではなくて、目立つように赤色に変更したいと思ったことありませんか？ ForeColorとRGB…

IF～ThenとFor～Nextを組み合わせ

ここでやりたいことは、条件に一致したセルを繰り返し探してVBAで文字色を変える事なので、複数のセルをそれぞれ条件に合っていれば、赤色文字に変更、そうでない場合は黒色文字に変更するという事です。

波乗りアヒル

たったこれだけのVBAコードで、指定した範囲内の値が合致すれば赤色文字にして、異なった時は黒色文字にできちゃいます。

エクセルVBAで指定できる色見本

エクセルVBA色見本（ColorIndex・RGB・16進数） 色見本（ColorIndex一覧） エクセルのワークシート上での文字やセルの背景色、ユーザーフォームのラベルなど各パーツの文字色・背景色に指定できる色見本です。 IF関数…

関連記事