从范围变量中查找第一行和最后一行编号

Question

我正在使用一些代码，其中 excel 范围保存在变量中。 我需要一种方法来查找这些范围变量的第一行和最后一行。 如果可能的话，我宁愿不使用xlend(down).row方法。 我想我可以把它放到一个数组中并获取 lbound 和 ubound 值，但对于一个非常简单的任务来说，这似乎需要做很多工作。 有什么简单的解决方案吗？

这是我举的例子：

sub test()
dim r as range
dim x as integer
dim y as integer
set r as worksheets("sheet1").Range("A1:A7")
x = r.row 'This gets the first row in the range.
y = r.lastrow 'this isn't valid, but I need something that will do the equivalent of this pseudo code
end sub

Answer 1

你可以使用这个

y = r.rows.count + x -1