按代码设置二维数组的值

Question

我想在VBA代码中设置二维数组的值（因为它们是常量）

我知道我可以设置一个单维数组：

mArr = Array("1", "Hello", "World",  "I", "am", "Sam")

但我不知道如何使用二维数组做同样的事情。

我也知道我可以使用：

设置多维数组的单个项的值

mArr (1, 3) = "World"

但我正在寻找一种同时设置所有值的方法（或使用最少的代码）。

很抱歉，如果这个问题很愚蠢，但我在网上找不到任何相关信息。

提前致谢。

Answer 1

尝试：

Dim v As Variant
v = Array(Array(1, 2), Array(3, 4), Array(5, 6))

或在你的情况下：

 mArr = Array(Array("1", "Hello"), Array("World", "I"), Array("am", "Sam"))

• 从这里： http://www.vbaexpress.com/forum/showthread.php?40163-How-to-conveniently-fill-a-2-dimensional-array

Answer 2

您可以使用快捷方式评估功能来实现此目的

像

这样的东西

mArr = [{"1", "Hello"; "World",  "I"; "am", "Sam"}]

这将产生基于1的3x2变体数组