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キーを押して、コードを実行します。
• 即時ウィンドウで結果を確認します。

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

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

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

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

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