Excel VBAでセルまたは複数のセルの範囲が空かどうかを確認するにはどうすればよいですか?

Excel VBAでセルまたは複数のセルの範囲が空かどうかを確認するにはどうすればよいですか?

今日は、Visual Basic for Applicationsを使用して、1つまたは複数のセルが空であるかどうかを簡単に確認する方法について学習します。このコンテンツは、Excel 2019 / 365、2016およびそれ以前のバージョンのMicrosoftOfficeに関連しています。

準備作業

ExcelでVBAを使用してコーディングを開始する前に、[開発]タブが有効になっていることを確認する必要があります。そうでない場合は、この短いチュートリアルをご覧ください

Excelのセル範囲がVBAで空かどうかを確認する

  • Excelで、Alt + F11を押してVisualBasic環境を開きます。
  • 次のコードを手順としてワークシートに挿入するか、専用のVBAモジュールに挿入します。
Sub Check_Cell_is_empty_alt()

Dim rng As Range
Set rng = Selection

For Each Cell In rng

    If IsEmpty(Cell.Value) = True Then
        
    Debug.Print ("Empty")
    Else
        Debug.Print ("Not Empty")
    End If
Next Cell


End Sub


  • スプレッドシートに移動して、任意の範囲のセルを選択します。
  • Visual Basicエディターに戻り、イミディエイトビューアー(CTRL + G)が表示されていることを確認します。コードのDebug.Printメソッドは、その結果をそのウィンドウに出力します。
  • F5キーを押して、コードを実行します。
  • 即時ウィンドウで結果を確認します。

Excel VBAでセルまたは複数のセルの範囲が空かどうかを確認するにはどうすればよいですか?

  • すべての空白セルが識別されます。

コードの可能な拡張:空白の値をスキップしたい場合や、セルがいっぱいでない場合は何もしない場合は、必要に応じてこのコードを拡張できます。同様に、範囲自体が空であるかどうか、つまり、黒いセルが含まれていないかどうかを確認できます。

空でないフィールドをチェックする

同様に、IsEmptyプロパティを使用して、空白でないフィールドをチェックできます。

 If Not IsEmpty(Cell.Value) = True Then
        Debug.Print ("Not Empty")
    Else
        Debug.Print ("Empty")
    End If

おまけ: 空のセルも強調表示したい場合は、次のコードを使用します。

Dim i As Long Dim c As Long Dim myRange As Range Dim myCell As Range Set myRange = Range("A1:A10") myRange 内の各 myCell に対して ' c = c + 1 If IsEmpty(myCell) then myCell.Interior.Color = RGB(255, 87, 87) i = i + 1 End If Next myCell MsgBox _ "合計数があります" &私と「 「」のうち空のセル&キャンプ; 「。」


[解決済み]錆がクラッシュし続ける問題を修正する方法は?

[解決済み]錆がクラッシュし続ける問題を修正する方法は?

Rustに直面すると、起動時または読み込み中にクラッシュし続けます。その後、指定された修正に従って、Rushクラッシュの問題を簡単に停止します…

Intel Wireless AC 9560 が動作しない場合の 9 つの修正 (コード 10)

Intel Wireless AC 9560 が動作しない場合の 9 つの修正 (コード 10)

Intel Wireless AC 9560 コード 10 の修正方法について詳しく解説します。Wi-Fi および Bluetooth デバイスでのエラーを解決するためのステップバイステップガイドです。

「不明なソフトウェア例外(0xe0434352)」を修正するにはどうすればよいですか?

「不明なソフトウェア例外(0xe0434352)」を修正するにはどうすればよいですか?

Windows 10および11での不明なソフトウェア例外(0xe0434352)エラーを修正するための可能な解決策を見つけてください。

[フルガイド]Steamのファイル権限の欠落エラーを修正する方法は?

[フルガイド]Steamのファイル権限の欠落エラーを修正する方法は?

Steamのファイル権限がないエラーにお困りですか?これらの8つの簡単な方法で、Steamエラーを修正し、PCでゲームを楽しんでください。

Windows 10でアプリとプログラムが自動的に最小化される問題を修正する7つの方法

Windows 10でアプリとプログラムが自動的に最小化される問題を修正する7つの方法

PC での作業中に Windows 10 が自動的に最小化される問題の解決策を探しているなら、この記事ではその方法を詳しく説明します。

学生が学校でブロックされることを気にせずに最もよくプレイするゲーム トップ 10

学生が学校でブロックされることを気にせずに最もよくプレイするゲーム トップ 10

ブロックされることを心配せずに学生が学校で最もよくプレイするゲーム トップ 10。オンラインゲームの利点とおすすめを詳しく解説します。

ワードウォール

ワードウォール

Wordwallは、教師が教室のアクティビティを簡単に作成できるプラットフォームです。インタラクティブな体験で学習をサポートします。

[解決済み]Ntoskrnl.Exe高CPU使用率Windows10

[解決済み]Ntoskrnl.Exe高CPU使用率Windows10

この記事では、ntoskrnl.exeの高いCPU使用率を解決するための簡単な方法を紹介します。

VACを修正すると、8つの簡単な方法でゲームセッションエラーを確認できませんでした

VACを修正すると、8つの簡単な方法でゲームセッションエラーを確認できませんでした

VACを修正するための解決策を探していると、CSでのゲームセッションエラーを確認できませんでした:GO?次に、与えられた修正に従います

INTERNAL_POWER_ERROR(0x000000A0)を修正する方法

INTERNAL_POWER_ERROR(0x000000A0)を修正する方法

簡単に取り除くために、ソリューションを1つずつ実行し、Windows 10、8.1、8、および7のINTERNAL_POWER_ERRORブルースクリーンエラー(0x000000A0)を修正します。