将工作表范围分配给数组

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

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