Sub CompareNulls() Dim varValue1 As Variant Dim varValue2 As Variant varValue1 = Null varValue2 = Null If varValue1 = varValue2 Then Debug.Print "Nulls are not equal" End If End Sub