VBA Check if variable is empty

Question

I have an object and within it I want to check if some properties are set to False, like:

If (Not objresult.EOF) Then
  'Some code 
End if

But sometimes, objresult.EOF is Empty; how can I check for this?

IsEmpty function is for excel cells only
objresult.EOF Is Nothing - returns Empty
objresult.EOF <> null - returns Empty as well!

Please provide some real code - show us what type of object is `objresult`. And `IsEmpty` is not specific for excel cells, it is for `Variant` variables. — Doc Brown, Jul 25 '10 at 12:21

score 110 · Answer 1 · edited Apr 26 '13 at 11:21

110

How you test depends on the Property's DataType:

| Type                                 | Test                            | Test2
| Numeric (Long, Integer, Double etc.) | If obj.Property = 0 Then        | 
| Boolen (True/False)                  | If Not obj.Property Then        | If obj.Property = False Then
| Object                               | If obj.Property Is Nothing Then |
| String                               | If obj.Property = "" Then       | If LenB(obj.Property) = 0 Then
| Variant                              | If obj.Property = Empty Then    |

You can tell the DataType by pressing F2 to launch the Object Browser and looking up the Object. Another way would be to just use the TypeName function:MsgBox TypeName(obj.Property)

edited Apr 26 '13 at 11:21

Matt Handy

29,855
2
89
112

answered Jul 25 '10 at 22:13

Oorang

6,630
1
35
52

`obj.Property = Empty` works for Numeric values as well. – Hope Jan 03 '20 at 09:22
3

I tried it with an unset worksheets variable. A check was only possible like this: `If ws Is Nothing Then` – Axel Dec 14 '20 at 12:58
1

Thanks Axel. This applies to Workbook variables too. – rleir Mar 14 '21 at 13:53
@Axel did not work for me for a workbook var: if var is empty then it throws a runtime error 424 `object needed`. – Timo Nov 06 '21 at 14:42

score 23 · Answer 2 · answered Dec 11 '13 at 11:33

23

To check if a Variant is Null, you need to do it like:

Isnull(myvar) = True

or

Not Isnull(myvar)

answered Dec 11 '13 at 11:33

Valentin Despa

40,712
18
80
106

score 13 · Answer 3 · answered May 20 '15 at 14:53

13

For a number, it is tricky because if a numeric cell is empty VBA will assign a default value of 0 to it, so it is hard for your VBA code to tell the difference between an entered zero and a blank numeric cell.

The following check worked for me to see if there was an actual 0 entered into the cell:

If CStr(rng.value) = "0" then
    'your code here'
End If

answered May 20 '15 at 14:53

deasa

606
9
24

1

Your code sample is a great workaround for distinguishing 0 and Empty – Laurent May 27 '15 at 14:00

score -2 · Answer 4 · answered Apr 07 '19 at 11:19

I had a similar issue with an integer that could be legitimately assigned 0 in Access VBA. None of the above solutions worked for me.

At first I just used a boolean var and IF statement:

Dim i as integer, bol as boolean
   If bol = false then
      i = ValueIWantToAssign
      bol = True
   End If

In my case, my integer variable assignment was within a for loop and another IF statement, so I ended up using "Exit For" instead as it was more concise.

Like so:

Dim i as integer
ForLoopStart
   If ConditionIsMet Then
      i = ValueIWantToAssign
   Exit For
   End If
ForLoopEnd

VBA Check if variable is empty

4 Answers4

Linked