【VBA】指定したセル範囲内の空白セルの数を取得する

2021.03.23

VBAで
　・指定したセル範囲内の空白セルの数を取得
できます！

VBAから
　・ワークシート関数「CountBlank」
を使用することで実現できます！

VBAコード

ここでは例として、
　・シート「sample」のセル「C3～H5」内の
　・空白セルの数
を取得します。

空白セルは5つある
空白セルは5つある
Option Explicit

Sub sample()

    Dim targetRange As Range
    
    Set targetRange = Worksheets("sample").Range("C3:H5")
    
    '空白セルの数を取得
    MsgBox ("空白セルの数は『" & WorksheetFunction.CountBlank(targetRange) & "個』です。")
 
End Sub

「WorksheetFunctionオブジェクト」の「CountBlank」メソッドによって、空白セルの数を取得できます。

実行結果

指定したセル範囲内の空白セルの数を取得できました。

実行結果
実行結果

参考

上記のVBAコードで使用した以下の詳細は、公式サイトをご確認ください。

●「WorksheetFunctionオブジェクト」の「CountBlank」メソッド

WorksheetFunction.CountBlank メソッド (Excel)
Office VBA リファレンス トピック
learn.microsoft.com