対象:Excel2007, Excel2010, Excel2013, Windows版Excel2016
「vba emptyでない」
「マクロ 空ではない判定 empty」
という検索で、このサイト・インストラクターのネタ帳へのアクセスがありました。
[スポンサードリンク]
Emptyかどうかを判定するサンプルマクロ
以下のようなSubプロシージャで、Variant型の変数・varがEmpty値かどうかを判定できます。
Sub Emptyかどうかを判定する_IsEmpty関数()
Dim var As Variant var = ActiveCell.Value
If IsEmpty(var) Then
MsgBox "Emptyです!"
Else
MsgBox "Emptyではありません。"
End If
End Sub
Dim var As Variant var = ActiveCell.Value
If IsEmpty(var) Then
MsgBox "Emptyです!"
Else
MsgBox "Emptyではありません。"
End If
End Sub
VBAのIsEmpty関数を使えば、Empty値かどうかを判定できます。
IsEmpty関数を使わずにEmptyかどうかを判定するサンプルマクロ
IsEmpty関数を使うことをおすすめしますが、VBAにはEmptyというキーワードが用意されているので、以下のような比較演算子を使った判定も可能です。
Sub Emptyかどうかを判定する()
Dim var As Variant var = ActiveCell.Value
If var = Empty Then
MsgBox "Emptyです!"
Else
MsgBox "Emptyではありません。"
End If
End Sub
Dim var As Variant var = ActiveCell.Value
If var = Empty Then
MsgBox "Emptyです!"
Else
MsgBox "Emptyではありません。"
End If
End Sub
Emptyでないことを判定するサンプルマクロ
上記2つのSubプロシージャのElse条件が、
「vba emptyでない」
「マクロ 空ではない判定 empty」
に該当するわけですが、Emptyでないという判定だけを行いたいのならば、Not演算子を組み合わせましょう。
Sub Emptyでないことを判定する_IsEmpty関数()
Dim var As Variant var = ActiveCell.Value
If Not IsEmpty(var) Then
MsgBox "Emptyではありません。"
End If
End Sub
Dim var As Variant var = ActiveCell.Value
If Not IsEmpty(var) Then
MsgBox "Emptyではありません。"
End If
End Sub
関連語句
Visual Basic for Applications
[スポンサードリンク]
- Newer:指定文字列を含むときの条件付き書式
- Older:Excel VBAでブックを読み取り専用に
Home » エクセルマクロ・Excel VBAの使い方 » Empty値か判定する