Excel VBA – dynamic范围大小

我试图find一个单独的工作表范围。

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) 

我努力得到'大小'给我正确的行数。 我究竟做错了什么?

您将需要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为你的目的。 只需从底部查找最后一行填入的行即可。