Comprobación de VBA si el objeto está configurado

Question

Tengo una variable global que es una instancia de mi clase personalizada.

¿Cómo verifico si el objeto está configurado o si necesito inicializarlo?

Answer 1

If obj Is Nothing Then 
    ' need to initialize obj: ' 
    Set obj = ... 
Else 
    ' obj already set/initialized. ' 
End If 

---

O, si lo prefiere al revés:

If Not obj Is Nothing Then 
    ' obj already set/initialized. ' 
Else 
    ' need to initialize obj: ' 
    Set obj = ... 
End If 

Answer 2

El (des) forma segura de hacer esto - si estás bien con no usar la opción explícita - es. ..

Not TypeName(myObj) = "Empty" 

Esto también maneja el caso si el objeto no ha sido declarado. Esto es útil si sólo quiere comentar una declaración para apagar un comportamiento ...

Dim myObj as Object 
Not TypeName(myObj) = "Empty" '/ true, the object exists - TypeName is Object 

'Dim myObj as Object 
Not TypeName(myObj) = "Empty" '/ false, the object has not been declared 

Esto funciona porque VBA se auto-instanciar una variable no declarada como un tipo Variant vacío. Elimina la necesidad de un booleano auxiliar para administrar el comportamiento.