メインコンテンツへスキップ

Excelでセルが空白の場合に警告/アラートメッセージを表示するにはどうすればよいですか?

Author: Kelly Last Modified: 2025-08-06
A screenshot of a questionnaire design in Excel showing cells with missing answers

たとえば、左のスクリーンショットに示すように、Excelでアンケートを作成したとします。

回答されていない質問がある場合に警告メッセージやアラートを表示したい場合、どのように設定すればよいでしょうか?この記事では、Excelの特定範囲内でセルが空白の場合に警告/アラートメッセージを表示するための3つの方法を紹介します。

ISBLANK関数を使用してセルが空白の場合に警告/アラートメッセージを表示する

ヘルプ列を使用してセルが空白の場合に警告/アラートメッセージを表示する

VBAを使用してセルが空白の場合に警告/アラートメッセージを表示する


ISBLANK関数を使用してセルが空白の場合に警告/アラートメッセージを表示する

カスタムテキストとISBLANK関数を使って、特定範囲内に空白セルがあることを示す警告メッセージを作成できます。以下の手順で行います:

ステップ 1: 空白のセルに ="未回答の質問は "&COUNTBLANK(B1:B16)&" 問あります!" という数式を入力し、Enterキーを押します。

注: 上記の数式では、B1:B16は空白セルをカウントしたい「回答」列の特定範囲であり、必要に応じて変更できます。
A screenshot of the formula bar in Excel showing the formula to count blank cells using COUNTBLANK function

ステップ 2次に、そのセルを目立つように書式設定します。セルを選択し、「ホーム」タブの ホーム > フォントの色 > をクリックし、次に 太字 ボタンをクリックし、必要に応じてフォントサイズを指定します。
A screenshot of Excel with a formatted cell showing a warning message in red and bold font for blank cells

選択範囲内のすべての空白セルにダッシュやNAなどの特定のテキストを素早く入力する

Kutools for Excelの「 空白セルを埋める」機能を使用すると、数回のクリックで選択範囲内のすべての空白セルに「警告」などの特定のテキストを簡単に挿入できます。

ad fill blank cells 5

Kutools for Excel - 必要なツールを300以上搭載し、Excelの機能を大幅に強化します。永久に無料で利用できるAI機能もお楽しみください!今すぐ入手

ヘルプ列を使用してセルが空白の場合に警告/アラートメッセージを表示する

また、特定範囲内の各空白セルの横に警告メッセージを表示するためのヘルプ列を追加することもできます。以下の手順で行います:

ステップ 1「回答」列の隣にあるセルC2に、次の数式を入力します: =IF(ISBLANK(B2),"この質問に回答してください"," ")そして、必要な範囲までフィルハンドルをドラッグします。
A screenshot of the formula in Excel where IF and ISBLANK are used

ステップ 2次に、数式を適用した範囲を選択し、「ホーム」タブの ホーム > フォントの色 > をクリックし、さらに 太字 ボタンをクリックします。
これで、「回答」列内の各空白セルの横に警告メッセージが追加されました。下のスクリーンショットをご覧ください:
A screenshot of a column in Excel showing warning messages next to blank cells in the Answer column


VBAを使用してセルが空白の場合に警告/アラートメッセージを表示する

また、VBAマクロを使用して、Excelの特定範囲内に空白セルがあるかどうかを確認することもできます。以下の手順で行います:

ステップ 1: Alt + F11 キーを押して、Microsoft Visual Basic for Applicationsウィンドウを開きます。

ステップ 2: 「挿入」>「モジュール」をクリックし、次のVBAコードを貼り付けます。

VBA: 特定範囲内に空白セルがある場合に警告する

Sub BlackCell()
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "Kutools for Excel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Set WorkRng = WorkRng.SpecialCells(xlCellTypeBlanks)
If Err = 0 Then
MsgBox "You don't answer all of questions!"
End If
End Sub
ステップ 3次に F5 または 実行 ボタンを押して、このVBAマクロを適用します。

ステップ 4これで、Kutools for Excelダイアログボックスが表示され、空白セルの存在を確認したい範囲を指定して、「OK」ボタンをクリックしてダイアログボックスを閉じます。 OK ボタンをクリックしてダイアログボックスを閉じます。
A screenshot of the Kutools for Excel dialog box where users specify a range to check for blank cells

特定範囲内に空白セルが存在する場合、次のスクリーンショットのようにダイアログボックスがポップアップ表示されます:
A screenshot of the dialog box showing an alert message indicating there are blank cells in the specified range in Excel


関連記事

Excelで特定のセルが空白の場合に保存を防ぐにはどうすればよいですか?

Excelでセルにテキスト/値/空白が含まれている場合に行をハイライトするにはどうすればよいですか?

Excelでセルが空白の場合に計算しない(数式を無視する)にはどうすればよいですか?

ExcelでIF関数をAND、OR、NOTと一緒に使用するにはどうすればよいですか?

Excelでセルが空白の場合にテキストやメッセージを入力/表示するにはどうすればよいですか?

Excelの長いリストでセルが空白の場合に行を削除するにはどうすればよいですか?

最高のオフィス生産性ツール

🤖 Kutools AI Aide:データ分析を革新:インテリジェント実行   |  コード生成  |  カスタム数式の作成  |  データを分析してグラフを生成  |  Kutools Functions を呼び出す
人気機能重複の検索・ハイライト・マーキング   |  空白行を削除   |  データを失わず列やセルを統合   |   丸める ...
スーパーLOOKUP複数条件VLOOKUP   複数値VLOOKUP  |  複数シートの検索  |  ファジーマッチ ....
高度なドロップダウンリストすばやくドロップダウンリストを作成   |  依存型ドロップダウンリスト   |  複数選択ドロップダウンリスト ....
列の管理:特定数の列を追加  | 列を移動  | 非表示列の表示状態を切り替え |  範囲と列の比較 ...
注目機能グリッドフォーカス   |  デザインビュー  |  強化された数式バー   ワークブック&ワークシートの管理   |  オートテキスト ライブラリ (Auto Text)   |  日付ピッカー   |  データの統合   |  セルの暗号化/復号化    リスト送信で電子メールを送信   |  スーパーフィルター   |   特殊フィルタ(太字/斜体/取り消し線でフィルタ...)
トップ15ツールセット12 種類のテキストツールテキストの追加特定の文字を削除など)  |  50 種以上のグラフ タイプガントチャートなど)  |  40を超える実用的な 数式誕生日に基づいて年齢を計算する、など)  |  19種の 挿入ツールQRコードの挿入パスから画像の挿入など)  |  12種類の 変換ツール単語に変換する通貨変換など)  |  7つの 結合&分割ツール高度な行のマージセルの分割など)  |  ...さらに多数
お好きな言語でKutoolsを使用できます ― 英語、スペイン語、ドイツ語、フランス語、中国語など40以上に対応!

Kutools for ExcelでExcelスキルを強化し、かつてない効率を体験しましょう。 Kutools for Excelは300以上の高度な機能で生産性向上と時間短縮を実現します。最も必要な機能を今すぐ取得...


Office TabはOfficeにタブ表示を追加し、作業効率を大幅に向上させます

  • Word、Excel、PowerPointでタブ編集とタブ閲覧を有効にします
  • 同じウィンドウ内の新しいタブで複数のドキュメントを開いたり作成したりできます。新しいウィンドウを開く必要はありません。
  • 生産性が50%向上し、1日に何百回ものマウスクリックも削減できます!