Определить пустая или нет ячейка — Visual Basic(Бейсик)

Вариант I, II, III

If IsEmpty(Range("A1")) = True Then 
   MsgBox "Ячейка пустая" 
Else 
   MsgBox "Ячейка непустая" 
End If

If VarType(Range("A1")) = vbEmpty Then 
   MsgBox "Ячейка пустая" 
Else 
   MsgBox "Ячейка непустая" 
End If

If TypeName(Range("A1").Value) = "Empty" Then 
   MsgBox "Ячейка пустая" 
Else 
   MsgBox "Ячейка непустая" 
End If
Совет: Если Вы хотите получить корректный результат проверки, то не используйте сравнение, типа = "" или = Empty, так как ячейка может содержать, например, формулу которая возвращает ""
Сравнение же с пустой строкой <> "" можно использовать, если Вам необходимо проверить содержит ли ячейка значение, отличное от ""