Условие на проверку значений

[segail]

Здравствуйте. Подскажите.
По условию идет поиск диапазона. Диапазон найден количество ячеек 31. Как правильно создать условие после And, если хоть в одной ячейки данного диапазона имеется значение?
Или считать пустоты.

Private Sub ComboBox2_Change()

    Dim i As Integer
    For i = 1 To 1000
        If Cells(i, 27).Text = ComboBox1.Text Then
            If Cells(i, 23).Value <> CDbl(ComboBox2.Text) And Sheets("Отчет").Cells(i, 27).Offset(, -1).Resize(31) > "" Then
                If MsgBox("ВНИМАНИЕ", vbYesNo + vbExclamation, " ?????????????? ?????????") = vbYes Then
                   Module2.Change
                End If
            Else
                Cells(i, 23).Value = CDbl(ComboBox2.Text): Module2.Foo
            End If
        End If
      Next
End Sub

[EducatedFool]

Private Sub ComboBox2_Change()
    Dim i As Integer
    For i = 1 To 1000
        If Cells(i, 27).Text = ComboBox1.Text Then
            If Cells(i, 23).Value <> CDbl(ComboBox2.Text) And IsNull(Sheets("Отчет").Cells(i, 26).Resize(31).Text) Then
                If MsgBox("ВНИМАНИЕ", vbYesNo + vbExclamation, " ?????????????? ?????????") = vbYes Then
                   Module2.Change
                End If
            Else
                Cells(i, 23).Value = CDbl(ComboBox2.Text): Module2.Foo
            End If
        End If
      Next
End Sub

Если в неком диапазоне ячеек хоть одна заполнена, то выражение IsNull(ДиапазонЯчеек.Text) вернёт TRUE

[segail]

Сообщение от EducatedFool

Если в неком диапазоне ячеек хоть одна заполнена, то выражение IsNull(ДиапазонЯчеек.Text) вернёт TRUE

А если наоборот True вернуть Flse?