Question

假如我有一列数字（有多少可以变化，但可能在1000-10000之间）我想在VBA中将它们全部读成数组，最快的做法是什么所以？

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

Answer 1

喜欢这个吗？

Dim Ar as Variant

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

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

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