填充多维数组

Question

我想知道如何在Excel VBA中填充多维数组。可以按如下方式填充1d数组：

Dim myarray as variant

myarray = Array("sheep", "goat", "chicken")

如何为多维数组分别填充每一行？

Answer 1

你可以这样做：

Dim a
a = [{1,2;3,4;5,6}]

限制：

• 这仅适用于Variant类型的数组，因为[x]是Evaluate("x")的简写，这意味着x是通过Excel解释的，而Excel只返回变种。因此，声明Dim a As Variant或数组Dim a() As Variant可以正常工作。但不是任何其他类型的阵列，例如Dim a() As String失败了。

• 这仅适用于一种特定类型的多维数组，即两个 - 维数组。不是三维，四维等。