Excel VBA组变量在一起并在组中执行For Each

Question

我正在编写一个包含大约11个阵列的代码。我想对每个数组中的相应元素执行相同的操作。我想知道是否有办法将阵列组合在一起并在组上运行For Each。这是我想要完成的一个非常简单的例子：

Array1 = ("A", "", "C")
Array2 = ("", "B", "C")
Array3 = ("","","C")
'Is there a way to group these arrays by say Group(Array1,Array2,Array3) 
'Or something like that to then do the following

For Each (Array in Group)
For i = 1 To 3 ' Position in Array
If ((Array in Group)) (i) = "" Then ' Test each position in the array
((Array in Group)) (i) = 1
End If
Next
Next

这是一个非常简单的例子来说明我想要提出的观点。我只是想知道我是否可以对数组进行分组，以便我可以在For Each循环中循环。

Answer 1

您可以使用

group = array(array1, array2, array3)

然后你可以使用每个。虽然使用索引变量而不是每个变量循环更有效。