Тестирование, если диапазон полностью пуст в Excel

Question

Я пытаюсь проверить, есть ли в какой-либо ячейке в указанном диапазоне данные, чтобы я мог перейти к следующему шагу проекта и распечатать данные, если это так. Допустим, у меня есть диапазон A1: F39. Как проверить, есть ли какие-либо данные в какой-либо из этих ячеек? В данный момент я последовательно перебираю весь диапазон ячеек, просматриваю всю строку, прежде чем перейти к следующему столбцу, и проверяю, пуста ли ячейка. Если есть лучший способ сделать это, я буду признателен за помощь, спасибо!

Dim RowCounter As Integer
Dim ColumnTraversing As Integer
Dim PopulatedCounter As Integer 
RowCounter = 1
ColumnTraversing = 1
PopulatedCounter = 0
With ThisWorkbook.Worksheets("Test") 
   While (ColumnTraversing <= 6)'column looper

       While (RowCounter < 40) 'Row Looper
'
       If (.Cells(RowCounter, ColumnTraversing).Text <> "") Then
           i = i + 1
       End If
       RowCounter = RowCounter + 1
       Wend

   ColumnTraversing = ColumnTraversing + 1
   RowCounter = 1
    Wend
    If (i > 0) Then 
        PopulatedCounter = PopulatedCounter + 1
    End If
End With