VBA IsObject 判断是否对象

判断变量的数据类型是否属于类。

语法

Function IsObject(var) As Boolean

判断变量var的数据类型是否属于类。如果是类，返回True；否则返回False。

示例

例1：不是类的数据类型。Integer、Double、String、Date等类型都不是类。

 Dim a1 As Integer
  Dim a2 As Double
  Dim a3 As String
  Dim a4 As Date

  Debug.Print IsObject(a1)    '打印 False
  Debug.Print IsObject(a2)    '打印 False
  Debug.Print IsObject(a3)    '打印 False
  Debug.Print IsObject(a4)    '打印 False

例2：判断四大Excel对象对应的类型是否属于类。

Sub sub3()
  Dim a1 As Application
  Dim a2 As Workbook
  Dim a3 As Worksheet
  Dim a4 As Range 

  Debug.Print IsObject(a1)
  Debug.Print IsObject(a2)
  Debug.Print IsObject(a3)
  Debug.Print IsObject(a4)

End Sub

输出内容：全部为True。