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)

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