Сообщество Чайников

Вопрос

Как в операторе цикла For задать проверку на пустую ячейку? То есть, когда i-тая ячейка окажется пустой, чтобы цикл завершался.

Ответ

Например, так:

For i = 1 To 10
Cells(i,1).Select
If ActiveCell.Value = "" Then Exit For
и так далее

Alex

Или так:

For i = 1 To 10
If Cells(i,1) = "" Then Exit For

******

For i = 1 To 20
If IsEmpty(Range("A" & i)) Then
MsgBox "Yes"
Exit For
End If
Next

dedtolya