分かりやすく、使いやすく。

オブジェクトが空(Nothing)であるかを調べる方法

スポンサーリンク

Excel VBA でオブジェクトが空(Nothing)かを確認するには Is を使用します。空(Nothing)ではないことを調べたい場合は式の先頭に Not を付与します。

  1. オブジェクトが空であることを調べる方法
  2. オブジェクトが空ではないことを調べる方法


オブジェクトが空であることを調べる方法

サンプルコードは次の通りです。

VBA(実行可能なサンプルコード)
1
2
3
4
5
6
7
8
9
10
11
Option Explicit
 
Sub test()
  Dim objTest
  Set objTest = Nothing
  
  If objTest Is Nothing Then
    'objTest が空(Nothing)の場合のみ実行
    Debug.Print "objTest は空っぽです"
  End If
End Sub 

実行結果は次の通りです。

実行結果(イミディエイト ウインドウの表示内容)
1
objTest は空っぽです 

オブジェクトが空ではないことを調べる方法

サンプルコードは次の通りです。

VBA(実行可能なサンプルコード)
1
2
3
4
5
6
7
8
9
10
11
Option Explicit
 
Sub test()
  Dim objTest
  Set objTest = ThisWorkbook
  
  If Not objTest Is Nothing Then
    'objTest が空(Nothing)でない場合のみ実行
    Debug.Print "objTest は空っぽではありません"
  End If
End Sub 

実行結果は次の通りです。

実行結果(イミディエイト ウインドウの表示内容)
1
objTest は空っぽではありません 
スポンサーリンク