VBA多维动态数组？

Question

我不知道如何创建动态多维数组。 目前，我已将数组声明为Dim fArr(0 To 4, 0 To 9) 。 它始终在一维中为（0到4），而另一维（0-9）总是可变的，那么我该怎么做？

我像这个例子一样填充我的数组

     Select Case fTyp
         Case Is = "A"
             fArr(0, aRow) = j
         Case Is = "B"
             fArr(1, aRow) = j
         Case Is = "C"
             fArr(2, aRow) = j
     End Select

谢谢

Answer 1

您可以使用ReDim在数组中创建动态量的尺寸。 首先，您必须通过以下方式使数组变暗：

Dim fArr() as String ' Or whatever datatype you want

然后，当您准备输入数组的维时，请使用ReDim。

ReDim fArr(4, VBAVariable) as String 'Or whatever datatype you want

您可以多次ReDim。 请查看本文，了解ReDim具有的其他功能。