空白セルを正しく判定する方法2

最終更新日：2020-12-05

空白セルを正しく判定する方法2

空白セルの判定について、いろいろな方から意見を頂きました、

やはり、空白判定は奥が深く結構難しいものとなっています。

ここでは、各プロパティや関数が、セルの状態によって返す値を再確認してみます。

元記事は、
空白セルを正しく判定する方法（IsEmpty,IsError,HasFormula）

空白セルの判定は、VBAにおいては頻繁に発生しますが、正しく空白セルを判定する事は以外と難しいものです。そもそも「空白」とはどのような状態なのか… これが、はっきりしない為に何が正しいのかが判然としないことが問題を複雑にしています。以下、A1セルが空白かどうか判定する方法をいくつか紹介します。

上記の記事では、


  
    
      If Not IsError(Cells(i, 1)) Then

      　　If Not Cells(i, 1).HasFormula Then

      　　　　If Cells(i, 1) = "" Then

      　　　　　　'空白

      　　　　End If

      　　End If

      End If

上記コードを一応の結論として提示しました。
しかしそれなら、
If IsEmpty(Cells(i, 1)) Then
これで良いのではないかと思われますが、
計算結果が空白("")を値貼り付けした場合に、IsEmptyはFalseを返します。
Excelの機能のジャンプでも、「空白セル」として判定されません。

ジャンプ機能のVBAは、
SpecialCells(xlCellTypeBlanks)

これで取得されるものは、IsEmptyでTrueと判定されるものと同一となります。

以下の表で、
Range
と表記しているものは、セルであるRangeオブジェクトになります。
実際には、Cells(i, 1)等々の記述に置き換えてお読みください。

	A	B	C	D	E	F	G	H	I
1	セルの内容	セル表示状態	Range = ""	Len(Range) = 0	Range. HasFormula	IsError (Range)	IsEmpty (Range)	Range = Empty	Range. Formula = ""
2	値として"ABC"	ABC	FALSE	FALSE	FALSE	FALSE	FALSE	FALSE	FALSE
3	何も入れていない		TRUE	TRUE	FALSE	FALSE	TRUE	TRUE	TRUE
4	=1/0	#DIV/0!	型が一致しません。	型が一致しません。	TRUE	TRUE	FALSE	型が一致しません。	FALSE
5	B4セルを値貼り付け	#DIV/0!	型が一致しません。	型が一致しません。	FALSE	TRUE	FALSE	型が一致しません。	FALSE
6	=""		TRUE	TRUE	TRUE	FALSE	FALSE	TRUE	FALSE
7	B6セルを値貼り付け		TRUE	TRUE	FALSE	FALSE	FALSE	TRUE	TRUE

空白と判定したいセルの状態によります。
B3セルは、これは空白に間違いはない。
しかし、B6セルとB7セルについては、何をしたいのかによって、
空白として扱うかどうかが変わってくると思います。

元記事の、
空白セルを正しく判定する方法（IsEmpty,IsError,HasFormula）

こちらと合わせて、実現したい内容にあったプロパティと関数を組み合わせて使用してください。

同じテーマ「マクロVBA技術解説」の記事

セルの値について（Value,Value2,Text）
Excelのバージョンを判断して「名前を付けて保存」
空白セルを正しく判定する方法（IsEmpty,IsError,HasFormula）
空白セルを正しく判定する方法2
Rangeオブジェクト.Valueの省略について
 シート保護でユーザー操作を制限する
 シートに数式を設定する時のセル参照の指定方法
 標準モジュールとシートモジュールの違い
 オートフィルタ（AutoFilter）の使い方まとめ
 複雑な条件（複数除外等）のオートフィルター（AutoFilter）
クリップボードを使わないセルのCopy

アクセスランキング・・・ランキング一覧を見る

1.最終行の取得（End,Rows.Count）｜VBA入門
2.RangeとCellsの使い方｜VBA入門
3.変数宣言のDimとデータ型｜VBA入門
4.マクロって何？VBAって何？｜VBA入門
5.セルのコピー&値の貼り付け（PasteSpecial）｜VBA入門
6.繰り返し処理（For Next)｜VBA入門
7.Range以外の指定方法（Cells,Rows,Columns）｜VBA入門
8.セルに文字を入れるとは（Range,Value）｜VBA入門
9.とにかく書いてみよう（Sub,End Sub）｜VBA入門
10.繰り返し処理（Do Loop）｜VBA入門

ホーム
マクロVBA応用編
マクロVBA技術解説
空白セルを正しく判定する方法2

このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。

記述には細心の注意をしたつもりですが、
間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
掲載のVBAコードは動作を保証するものではなく、あくまでVBA学習のサンプルとして掲載しています。
掲載のVBAコードは自己責任でご使用ください。万一データ破損等の損害が発生しても責任は負いません。

VBA技術解説
空白セルを正しく判定する方法2