Excel VBA - 动态范围大小

Question

我试图在另一张纸上找到该范围。

Dim abc As Range
Dim size As Integer
size = Sheets("Misc").Cells(1, Sheets("Misc").Cells(1, 1).Rows.End(xlDown).Count)
abc = Sheets("Misc").Range("A1:A" & size)

我正在努力获得'大小'以正确地给我行数。我做错了什么？

Answer 1

您需要Set范围。

dim sz as LONG
with Sheets("Misc")
    sz = .Cells(rows.count, 1).End(xlUp).Row
    SET abc = .Range("A1:A" & sz)
end with

行号应该足够了。你的目的并不需要.Count。只需从下往上查找最后填充的行。