将工作表范围分配给数组

Question

我正在尝试将工作表中的范围分配给数组变量，到目前为止它还没有用完。不是VB的主题专家，任何帮助表示赞赏。我输入的范围是明确的，但是行和列大小的数组声明到目前为止只是猜测。谢谢！

Dim runningavg(1 To 10000, 1 To 76), chartdata(1 To 598, 1 To 121) As Long

runningavg = Worksheets("Running Avg Log").Range("A4:BX10004")
chartdata = Worksheets("Chart Data").Range("B6:DR604")

Answer 1

这样可行 - Variant可以分配给任何：

Dim runningavg as variant, chartdata as variant

runningavg = Worksheets("Running Avg Log").Range("A4:BX10004").value
chartdata = Worksheets("Chart Data").Range("B6:DR604").value

当数组已经调整大小而不是变体时，您无法将整个范围读入数组。要使用固定数组执行此操作，您需要逐个单元格地写入数组。