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達到目的。 只需從下往上查找，即可找到最后一個填充的行。