使用VBA遍历2D阵列

时间:2019-05-01 16:21:57

标签: excel vba

我有几个设计,每个设计都有几个变量。

使用VBA代码,我想遍历每个设计,并将变量分配给一个设计的每个索引。 我很难正确设置数组dim语句,并正确调用每个设计的第n个变量。 我在这里显示了VBA代码,该代码使用消息框显示是否从每个j循环和每个设计中获取正确的值。

有帮助吗?

Dim Design(0 To 9) As Variant

Sub main

Design(1) = Array(4,6,2,1)
Design(2) = Array(8,2,6,9)

For i = 1 To 2
   For j = 1 to 4
     MsgBox (Design(i)(j-1))
   Next j
Next i

End sub

1 个答案:

答案 0 :(得分:0)

哇,我很抱歉。我一直在尝试让WEEKS发挥作用,并且在格式化此问题的方式时,它终于起作用了!代码是好的。