arrays - 将一列数字读入数组的最快方法

Question

假设我有一列数字（其中有多少可以变化，但可能在 1000-10000 之间）并且我想将它们全部读入 VBA 中的数组，那么最快的方法是什么？

显然我可以创建一个大小为 10000 的数组并执行一个 for/while 循环，但是有没有比这更快的方法？

Answer 1

像这样？

Dim Ar as Variant

Ar = Sheets("Sheet").Range("A1:A10000").Value

如果您不知道最后一行，那么您可以使用它找到最后一行，然后使用上面的代码作为

Ar = Sheets("Sheet").Range("A1:A" & LRow).Value