查找某个范围内连续使用的单元格的行数

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”是单单元格范围，而不是多行等