Excel: フォントの色が赤の場合、特定のテキストを返すか、その他の操作を行う
実際のExcel使用において、フォントの色(特に赤)は警告、例外、検証失敗、または高優先度のメモを示すためによく使用されます。これらの色を手動で適用したり、条件付き書式を使用して設定するのは簡単ですが、数式を使ってフォントの色を検出し、それに基づいて操作を行うのは簡単ではありません。例えば、カスタムメッセージを返したり、関連するセルをハイライトしたり、セル内の文字が赤い場合に書式を調整したい場合があります(下記参照)。
この記事では、Excelで赤いフォントに基づいた操作を処理するためのいくつかの実用的な解決策を紹介します。これらの方法には、VBAベースの検出や条件付き書式、Find & Replaceなどの組み込みツールが含まれます。また、ユースケースの適切性や一般的な落とし穴についても探り、最適な方法を選択する助けをします。

フォントの色が赤の場合、別のセルに特定のテキストを返す
参照セルのフォントの色が赤かどうかに基づいて、別のセルに「Fail」や「Pass」といった特定のテキストを返したい場合、直接数式では対応できません。これは、Excelの関数ではデフォルトでフォントの色をテストできないためです。これを実現するには、User Defined Function (UDF) とも呼ばれるカスタムVBA関数を使用できます。この方法は、フォントの色の変更に常に最新に対応できるように動的に結果を表示する必要がある場合に適しています。ただし、ワークブックのすべてのユーザーがマクロを有効にする必要があります。
1. Alt + F11を同時に押してMicrosoft Visual Basic for Applicationsエディタウィンドウを開きます。
2. 次に、挿入 > モジュールを選択します。開いたモジュールウィンドウに以下のVBAコードをコピーして貼り付けます。
VBAコード: フォントの色が赤の場合、特定のテキストを返す
Function FontColorisRed(Rng As Range)
'Updateby ExtendOffice
Application.Volatile
If Rng.Font.ColorIndex = 3 Then
FontColorisRed = "Fail"
Else
FontColorisRed = "Pass"
End If
End Function
3. VBAエディタを閉じます。次に、ワークシートのセルに次の数式を入力します(例: C2セル):=FontColorISRed(B2) その後、フィルハンドルをドラッグして他の行にも適用します。参照セルのフォントの色が赤の場合、結果として「Fail」がすぐに表示されます。
参照セルのフォントの色を変更した後、数式が更新されない場合は、F9キーを押すか、数式を再入力して結果を更新してください。すべてのVBAソリューションと同様に、ファイルはマクロ有効ブック (.xlsm) として保存し、この機能を使用するためにマクロを有効にする必要があります。

Kutools AIでExcelの魔法を解き放つ
- スマート実行: セル操作、データ分析、グラフ作成を簡単なコマンドで行います。
- カスタム数式: ワークフローを合理化するための独自の数式を生成します。
- VBAコーディング: 簡単にVBAコードを作成し実装します。
- 数式の解釈: 複雑な数式を簡単に理解できます。
- テキスト翻訳: スプレッドシート内の言語障壁を取り除きます。
フォントの色が赤の場合、セルをハイライトする
フォントの色が赤いセルを目立たせたり、さらに操作を加えたい場合、VBA関数とExcelの条件付き書式を組み合わせて使用することができます。この解決策は、特定のセルを目立たせたい場合や、既存の書式設定ルールと組み合わせたい場合に効果的です。このアプローチにはマクロが必要なので、ファイルを共有する予定がある場合は、マクロのセキュリティ設定を適切に管理してください。
1. Alt + F11を押してVBAエディタを開きます。
2. 挿入 > モジュールをクリックし、次のVBAコードをモジュールウィンドウに貼り付けます。
VBAコード: フォントの色が赤の場合、セルをハイライトする
Function HighlightRedFont(pRg As Range) As Boolean
'Updateby ExtendOffice
Dim xRg As Range
Dim xBol As Boolean
xBol = False
For Each xRg In pRg
If xRg.Font.Color = vbRed Then
xBol = True
End If
Next
HighlightRedFont = xBol
End Function
3. VBAエディタを閉じてExcelに戻ります。ホーム > 条件付き書式 > 新しいルールを選択します(以下参照)。
4. [新しい書式ルール] ダイアログボックスで、次の手順を行います。
- [ルールの種類を選択] の下で、[数式を使用して書式設定するセルを決定] を選択します。
- 数式ボックスに次の数式を入力します(例: B2に適用する場合): =highlightredfont(B2)
- [書式] ボタンをクリックして目的のハイライトオプションを設定します。
5. [セルの書式設定] ダイアログで、[塗りつぶし] タブに移動し、セルのハイライト色を選択します。[OK] をクリックして選択を確認します。
6. 各ダイアログに対して[OK] を2回クリックしてルールを適用します。これにより、フォントが赤いセルが設定に従って自動的にハイライトされます(以下参照)。
条件付き書式がフォントの色を変更しても更新されない場合は、影響を受けたセルを編集するか、F9キーを押して更新を試みてください。この方法は、カスタムVBA関数が利用可能で、マクロが有効であることに依存することを忘れないでください。
フォントの色が赤の場合、フォントの色を変更する
書式を統一したり、データをより適切にマークしたりするために、赤いフォントのすべてのテキストを別のフォントの色に変更する必要がある場合があります。Excelには、この要件を満たすためのいくつかの解決策があり、組み込みの検索と置換や、Kutools for Excelのようなサードパーティ製のアドインが含まれます。各アプローチにはそれぞれの利点と考慮すべき点があります。
フォントの色が赤の場合、検索と置換機能でフォントの色を変更する
Excelの検索と置換機能は、書式に基づいて検索して置換することが可能です。これにより、特定のフォント色(例えば赤)を持つすべてのセルを選択し、効率的に別の色に変更できます。この方法は、ワークシート全体または範囲にわたる迅速な操作に適しており、マクロやアドインは不要です。
1. フォントの色を変更したい範囲を選択し、Ctrl + Hを押して[検索と置換] ダイアログを開きます。[オプション>>] をクリックして詳細設定を展開します(以下参照)。
2. 展開されたダイアログで、次の手順を行います。
- 書式に焦点を当てるために、[検索内容] と[置換内容] のフィールドは空白のままにしておきます。
- [検索内容] ボックスの隣で、[書式] > [セルから書式を選択] をクリックし、対象とする赤いフォントのセルをクリックします。
- [置換内容] の横で、[書式] > [書式] をクリックして[置換書式] ダイアログを開きます。
3. [置換書式] ダイアログで、[フォント] タブの下にある[色] ドロップダウンから希望の置換色を選択します。設定を確認します。
4. [OK] をクリックして[置換書式] ダイアログを終了します。最後に、[検索と置換] ダイアログで[すべて置換] をクリックします。識別された赤いフォントを持つすべてのセルが即座に選択した新しいフォントの色に変わります。
この方法は、マクロを有効にする必要なく一括操作を行う場合に特に有用です。ただし、ワークフローの一環として頻繁にフォントの色が変わる場合は、自動化または選択的な解決策を検討してください。
便利な機能を使用してフォントの色が赤の場合、フォントの色を変更する
Kutools for Excelがインストールされている場合、その「類似の書式を持つセルを選択する」機能を使用することで、まったく同じフォント色(例えば赤)を持つすべてのセルを素早く選択し、一括で新しいフォント色を適用できます。この方法は基本的な検索と置換よりも柔軟で、フォント色のみに限定して選択したり、他の特定の属性を含めたり除外したりできます。Kutoolsは、大きなデータセットで豊富な書式を管理するユーザーにとって使いやすいインターフェースを提供し、理想的です。
Kutools for Excelをインストール後、以下の手順に従ってください。
1. 操作したい範囲を選択し、次にKutools > 選択 > 類似の書式を持つセルを選択するを選択します(以下参照)。
2. [類似の書式を持つセルを選択する] ダイアログで、[セルから書式を選択] をクリックし、赤いフォントのセルを選択します。どの書式プロパティと一致させるかを調整でき、この場合は、他の書式に関係なく、この赤いフォントを使用するすべてのセルに一致させるために、[フォントの色] のみチェックしたままにしておきます。
3. [OK] をクリックします。ポップアップボックスで、[はい] をクリックして続行します。
4. 赤いフォントの色を持つすべてのセルが一度に選択されます。これらのセルが選択されている状態で、Excelのフォント色ドロップダウンを使用して必要な場合は手動でフォント色を変更できます。
この方法は、大規模なデータ範囲や、色だけに基づいた選択的な書式調整が必要な場合に特に効率的です。この機能を使用する際は、視覚的には似ているがわずかな書式の違いがあるセルを除外しないように、選択する書式属性が正しいことを確認してください。
ヒント: Kutoolsはバッチ処理や元に戻す機能も提供しており、選択や書式設定の操作中にミスを防ぎ、迅速に変更を元に戻すのに役立ちます。
予期しない結果が出たり、目的のセルが選択されない場合は、ダイアログで正しい書式属性(例えばフォントの色)のみがチェックされているかを再確認してください。また、対象のデータ範囲内にいることも確認してください。
上記の方法以外にも、Excelでフォント色に基づいてデータを処理する方法は他にもあります。
- VBAバッチ処理コード: 大量のデータセットを頻繁に操作する必要がある場合、カスタムVBAスクリプトを作成してすべてのセルを繰り返し処理し、赤いフォントが検出されたときにアクションを実行できます。これは、大量の書式設定、マーク付け、または一致したセルの記録に柔軟に対応できますが、基本的なVBAプログラミング知識が必要です。
- 手動レビューと並べ替えの組み合わせ: Excel2007以降で使用可能なセルの色またはフォントの色による並べ替えを使用して、赤いフォントのデータをグループ化し、見やすくしたり編集しやすくします。これは特に、一度限りのタスクやマクロ/アドインが許可されていない場合に適しています。
どのアプローチを使用する場合でも、作業前に必ず保存し、理想としてはサンプルデータのコピーで方法を試してください。特に、バッチ操作やマクロを使用する場合です。通常のトラブルシューティングには、F9キーを押して計算を更新し、VBAベースのアプローチが期待通りに動作しない場合はExcelの信頼センターでマクロ設定を確認します。
まとめると、Excelでのフォントの色に基づく操作には組み込みの数式だけでは不十分です。適切なツール(VBA、Excelの組み込み機能、Kutoolsなどのアドイン)を選ぶことは、ワークフローの頻度や複雑さに依存します。どの方法を選んでも、色コード、書式属性の選択、およびマクロのセキュリティを常に再確認し、効率的かつ正確な結果を得るようにしてください。
最高のOffice生産性ツール
Kutools for Excel は、ほとんどの問題を解決し、生産性を80%向上させます。
- スーパー数式バー(複数行のテキストや数式を簡単に編集可能); 閲覧レイアウト(多数のセルを簡単に読み取り・編集可能); フィルター範囲への貼り付け...
- セル/行/列を結合してデータを保持; セル内容を分割; 重複する行を統合して合計/平均を計算... 重複セルを防止; 範囲を比較...
- 重複または一意の行を選択; 空白行を選択(すべてのセルが空); スーパー検索および多くのワークブックでのあいまい検索; ランダム選択...
- 数式参照を変更せずに複数のセルを正確にコピー; 複数のシートへの自動参照作成; 箇条書き、チェックボックスなどを挿入...
- お気に入りの数式、範囲、グラフ、画像を素早く挿入; パスワードでセルを暗号化; メーリングリストを作成してメールを送信...
- テキストの抽出、テキストの追加、特定の位置の文字を削除、スペースを削除; ページング小計の作成と印刷; セルの内容とコメント間の変換...
- スーパーフィルター(他のシートにフィルタースキームを保存して適用); 月/週/日ごとの高度な並べ替え、頻度など; 太字、斜体による特殊フィルタリング...
- ワークブックとワークシートを統合; 主キーカラムに基づいてテーブルをマージ; データを複数のシートに分割; xls、xlsx、PDFの一括変換...
- ピボットテーブルのグループ化(週番号、曜日など)... ロックされたセルとロックされていないセルを異なる色で表示; 数式/名前を持つセルをハイライト...

- Word、Excel、PowerPoint、Publisher、Access、Visio、Projectでタブ付き編集と閲覧を有効化します。
- 新しいウィンドウではなく、同じウィンドウ内の新しいタブで複数のドキュメントを開き、作成します。
- 生産性を50%向上させ、毎日数百回のマウスクリックを削減します!
