Найти количество строк последовательных используемых ячеек ниже диапазона

Question

Скажем, у меня есть именованный диапазон на листе.Мне нужно посчитать количество последовательных строк со значением непосредственно ниже диапазона.Я пробовал это:

endRow = Range("MyRange").End(xlDown).Row

Это работает хорошо, если нет строк ниже диапазона, и в этом случае он возвращает последнюю строку в листе (1048576).Есть ли лучший подход, который я могу использовать?

Answer 1

Ваше описание того, что вы хотите сделать, не совсем соответствует вашей строке кода, но что-то вроде этого должно работать:

With Range("MyRange")
    endRow = IIf(Len(.Offset(1, 0)) = 0, .End(xlDown).Row, .Row)
End With

... при условии, что «MyRange» - это диапазон из одной ячейки,не многорядный и т. д.