【VBA】変数がEmpty値か判定する方法

今回はVariant型で定義した変数がEmpty値なのか判定する方法を紹介します。

30日間無料登録できる「Amazonプライム会員」に登録すれば、翌日に購入した商品が届くお急ぎ便・お届け日時指定便の指定ができるので、荷物をなるべく早く受け取りたい人にオススメ！

無料体験期間中もAmazonプライムビデオや1億曲以上聞き放題のAmazon Musicなど、すべてのプライム会員特典がセットになっています！

　　30日間の無料体験はこちら！　　

うめ

30日間以内に解約すれば費用は発生しません！

Emptyの判定
Empty以外であるか判定
まとめ

Emptyの判定

「IsEmpty」を使うことでEmptyの判定を行うことができます。

A1セルを空白のまま実行するとEmptyと判断され、入力なしのメッセージが表示されます。

Sub Sample1()

Dim Val As Variant: Val = Range("A1").Value

If IsEmpty(Val) Then
    MsgBox "入力なし(Emptyです)"
Else
    MsgBox "入力あり(Emptyではない)"
End If
  
End Sub

Sub Sample1()

Dim Val As Variant: Val = Range("A1").Value

If IsEmpty(Val) Then

MsgBox "入力なし(Emptyです)"

Else

MsgBox "入力あり(Emptyではない)"

End If

End Sub

Empty以外であるか判定

逆にEmptyでない場合の判定をしたい場合は「Not IsEmpty」を使うことでEmptyでないことを確認できます。

Sub Sample2()

Dim Val As Variant: Val = Range("A1").Value

If Not IsEmpty(Val) Then
        MsgBox "入力あり(Emptyではない)"
Else
        MsgBox "入力なし(Emptyです)"
End If
  
End Sub