我正在尝试将一个数组切成几个不同的数组(分成i个数组), 像这样:
Dim a As Double
Dim i,u,e,Number As Integer
Dim BigArray As Double
Redim BigArray(a,3)
For i=0 to Number-1
Dim Arrayi() as Double
redim Arrayi(0 to Round((i+1)*a/Number,0)-Round(i*a/Number,0)-1,3)
For e=0 to 3
For u=0 to UBound(Arrayi())
Arrayi(u,e)=BigArray(u+Round(i*a/Number,0),e)
Next u
Next e
Next i
现在,如果我手动声明我的数组“ Arrayi”并且不为我循环,这将起作用,但是我想知道是否有一种方法可以自动声明“ Array0”,“ Array1”等。
我需要的Array的数量将因项目而异,并且必须手动声明它们并为它们分配值非常浪费时间。
感谢您的帮助!