セル文字が空白(empty)か0なのか判定する【ExcelVBA】

セル文字が「空白」or「0の値」or「数式の0」か判別したい

VBA請負開発中に少しはまった部分です。
0と空白セルによって処理を分けたいのですが、単純に比較ができませんでした。備忘録として残します。

セル文字が「空白」or「0の値」or「数式の0」か判別するサンプルコード

セル内の文字が「空白」or「0の値」or「数式の0」なのか判別
Public Sub sample()
    If Cells(1, 1).Value = Empty Then   '
        If Cells(1, 1).Value = "" Then
            Debug.Print "セルは空白(Empty)"
        Else
            Debug.Print "セルは数値0の値 もしくは数式による計算式結果が0"
        End If
    Else
        Debug.Print "セルは数値0以外"
    End If
End Sub

注意点

• 特にありません。

関連記事

• 0埋めして桁数を揃える(Format関数/Right関数)
• 0埋めした文字列の0を削除する【Val関数応用】
• セルの数値0の表示/非表示の切替【DisplayZerosプロパティ】