Working with Empty and Null
Sub StringVar() Dim strName As String Debug.Print IsEmpty(strName) 'Prints False Debug.Print strName = "" 'Prints True End Sub