小编Ala*_*ana的帖子

以下是完整的 VBA 代码。我创建了一个多重嵌套字典，其键结构为team>> 。这些值将存储为数组，以便我可以使用 访问这些值。membermthmydict(team)(member)(mth)(0 or 1)

但是，当我通过循环字典键并声明一个临时数组来修改数组元素来更新数组时。它没有走正确的路。

完整的 VBA 代码

Sub test()

Dim mydict1 As New Scripting.Dictionary
Dim mydict2 As New Scripting.Dictionary
Dim mydict3 As New Scripting.Dictionary
Dim mydict4 As New Scripting.Dictionary

For Each mth In Array(1, 2)
    mydict3.Add mth, Array("NA", "NA")
Next mth

For Each member In Array(11, 22, 33)
    mydict4.Add member, mydict3
Next member

For Each team In Array(1, 2)
mydict1.Add team, mydict4
Next team

i = 1

For Each team In …