VBATips

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

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

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

■理由
セル文字「0」(ゼロ)はEmptyで判定され、同様に空白セルもEmptyで判定されてしまったため。

セル文字が「空白」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

注意点

  • 特にありません。

関連記事

コメント

  1. 同じことで悩んでました。ここに記載されていることをやってみました。問題が解決し大変助かりました。

タイトルとURLをコピーしました