Vba 在阵列中存储阵列

Vba 在阵列中存储阵列,vba,excel,Vba,Excel,在Excel VBA中,是否有方法将数组存储在另一个数组中?例如,如果我创建了一个名为“World”的一维数组和具有不同名称的二维数组,是否可以将每个二维数组存储到“World”的每个项中(无论数组“World”有多长)?如果是这样,我该如何做,以及如何引用“World”中2D数组中的项 我应该考虑使用对象和/或类吗?你是如何做到这一点的?或者你有一个好的地方可以让我参考吗?我在网上找了一段时间,还没有找到解决办法。非常感谢您的帮助。您可以使用3d阵列或锯齿阵列(或阵列阵列) Sub-Three

在Excel VBA中,是否有方法将数组存储在另一个数组中?例如,如果我创建了一个名为“World”的一维数组和具有不同名称的二维数组,是否可以将每个二维数组存储到“World”的每个项中(无论数组“World”有多长)?如果是这样,我该如何做,以及如何引用“World”中2D数组中的项


我应该考虑使用对象和/或类吗?你是如何做到这一点的?或者你有一个好的地方可以让我参考吗?我在网上找了一段时间,还没有找到解决办法。非常感谢您的帮助。

您可以使用3d阵列或锯齿阵列(或阵列阵列)

Sub-ThreeDArray()
Dim World()作为字符串或您选择的类型
雷迪姆世界(0到4,1到3,1到2)
世界(5,1,2)=“a”
调试.打印世界(5,1,2)
端接头


您可以使用3d阵列,或者称为锯齿阵列(或阵列阵列)的阵列

Sub-ThreeDArray()
Dim World()作为字符串或您选择的类型
雷迪姆世界(0到4,1到3,1到2)
世界(5,1,2)=“a”
调试.打印世界(5,1,2)
端接头


在我看来,我会使用一个集合。然后,您可以拥有集合的集合。集合很好,因为您可以引用“键”并获得相应的值

   Public Function MultiDimensionalCollection() as Collection
       Dim tempColl as Collection
       Set MultiDimensionalCollection = new Collection

       For i = 1 to 100
           Set tempColl = New Collection
           tempColl.Add "Value", "Key-" & i 
           tempColl.Add "Value2", "Key2-" & i
           tempColl.Add "Value3", "Key3-" & i
           MultiDimensionalCollection.Add tempColl, "Key-" & i
       Next i

   End Function

显然,您可以用任何东西(对象、范围值等)填充它们。只需确保不复制“KEY”值,否则会出现错误。如果您想要从范围或记录集或任何您想要的地方填充它们的示例代码,请告诉我。谢谢你,布莱恩。

依我看,我会使用收藏。然后,您可以拥有集合的集合。集合很好,因为您可以引用“键”并获得相应的值

   Public Function MultiDimensionalCollection() as Collection
       Dim tempColl as Collection
       Set MultiDimensionalCollection = new Collection

       For i = 1 to 100
           Set tempColl = New Collection
           tempColl.Add "Value", "Key-" & i 
           tempColl.Add "Value2", "Key2-" & i
           tempColl.Add "Value3", "Key3-" & i
           MultiDimensionalCollection.Add tempColl, "Key-" & i
       Next i

   End Function

显然,您可以用任何东西(对象、范围值等)填充它们。只需确保不复制“KEY”值,否则会出现错误。如果您想要从范围或记录集或任何您想要的地方填充它们的示例代码,请告诉我。谢谢,Brian。

如果您在VBA中,那么您希望使用
集合
脚本.字典
来实现类似的功能。谷歌他们,有成千上万的例子和帮助网站。如果你在VBA,那么你想使用
集合
脚本。字典
来实现类似的功能。谷歌他们,那里有成千上万的例子和帮助网站。