查找范围变量中的第一个和最后一个行号

时间:2017-07-21 19:56:01

标签: excel vba range

我有一些我正在使用的代码,其中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.rows 'this gets me 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

1 个答案:

答案 0 :(得分:1)

您可以使用此

y = r.rows.count + x -1