IsObject関数
識別子（主にバリアント変数）がオブジェクト変数を表しているかどうかを判断する場合に使用します。
バリアント変数がオブジェクト変数を表しているかどうかを示すBoolean値（True/False）を返します。
IsObject関数の構文
IsObject関数の解説
それ以外の場合は、 Falseを返します。
具体的に説明すると、
・Object型で宣言されている場合
・固有オブジェクト型で宣言されている場合
・バリアント変数がオブジェクトを表している場合
・変数にNothingが設定されている場合
上記以外の場合は、 IsObject関数はFalseを返します。
したがって、VBAの基本データ型（プリミティブ型）は常にFalseが返りますので判定する意味はありません。
IsObjectはクラスがインスタンス化（New）されているかどうかの判定には使えません。
クラスがインスタンス化されているかどうかを判定するには、Is Nothingを使用してください。
IsObject関数に指定できない変数
IsObject関数の使用例
Dim vObject As Object
Debug.Print IsObject(vObject) 'True
Dim vRange As Range
Debug.Print IsObject(vRange) 'True
Dim vClass As クラス名
Debug.Print IsObject(vClass) 'True
Dim vLong As Long
Debug.Print IsObject(vLong) 'False
Dim vVariant As Variant
Debug.Print IsObject(vVariant) 'False
Set vVariant = Nothing
Debug.Print IsObject(vVariant) 'True
vVariant = "abc"
Debug.Print IsObject(vVariant) 'False
Set vVariant = Range("A1")
Debug.Print IsObject(vVariant) 'True
Variant変数がNothingとなっている場合にもTrueが返る事に注意してください。
実務的な使用場面としては、
以下のように関数Function等の代入ステートメントでの書き分けに使用されることが多いでしょう。
Function fnc(arg As Variant) As Variant
If IsObject(arg) Then
Set fnc = arg
Else
fnc = arg
End If
End Function
変数がオブジェクト（Nothingを含む）を表している場合、代入ではSetステートメントの記述が必要になります。
逆に、オブジェクト以外の場合には、Setステートメントを記述することができません。
同じテーマ「VBA関数」の記事
IsEmpty関数
IsNumeric関数
IsMissing関数
IsObject関数
TypeName関数
VarType関数
Date関数
DateAdd関数
DateDiff関数
DatePart関数
DateSerial関数
新着記事NEW ・・・新着記事一覧を見る
「VBAで導関数を求めよ」ツイッターのお題をやってみた｜エクセル雑感（2月9日）
Property {Get|Let|Set} ステートメント｜VBA入門（2月9日）
フィボナッチ数列（再帰呼び出し）｜VBA技術解説（2月8日）
エクセルで連立方程式を解く（MINVERSE,MMULT）｜エクセル雑感（2月7日）
スピルって速いの?スピルの速度について｜VBA技術解説（2月4日）
スピルでVBAの何が変わったか｜VBA技術解説（2月3日）
スピルについて｜エクセル入門（2月3日）
エクセルで「もういくつ寝るとお正月」｜エクセル雑感（1月29日）
VBAの少数以下の演算誤差について｜VBA技術解説（1月29日）
VBAで写真の撮影日時や音楽動画の長さを取得する｜VBA技術解説（1月23日）
アクセスランキング ・・・ ランキング一覧を見る
1.最終行の取得（End,Rows.Count）｜VBA入門
2.RangeとCellsの使い方｜VBA入門
3.セルのコピー&値の貼り付け（PasteSpecial）｜VBA入門
4.マクロって何？VBAって何？｜VBA入門
5.Range以外の指定方法（Cells,Rows,Columns）｜VBA入門
6.変数宣言のDimとデータ型｜VBA入門
7.繰り返し処理（For Next)｜VBA入門
8.セルに文字を入れるとは（Range,Value）｜VBA入門
9.空白セルを正しく判定する方法（IsEmpty,IsError,HasFormula）｜VBA技術解説
10.ひらがな⇔カタカナの変換｜エクセル基本操作
このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。
記述には細心の注意をしたつもりですが、
間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
掲載のVBAコードは動作を保証するものではなく、あくまでVBA学習のサンプルとして掲載しています。
掲載のVBAコードは自己責任でご使用ください。万一データ破損等の損害が発生しても責任は負いません。