迭代VBA字典?

时间:2009-08-18 20:14:32

标签: excel vba excel-vba

我正在使用MS Runtime Scripting库中的Dictionary类来存储标签将用于报告模板的位置。有没有办法迭代该字典中的所有键值对,就像在Python中一样?我只想使用密钥作为行号(这一切都在A列中),值将是标签头。

类似的东西:

For Each key in dict
    Range("A" & key).Value = dict(key)
Next key

1 个答案:

答案 0 :(得分:101)

尝试:

For Each varKey In oDic.Keys()
    Range("A" & varKey).Value = oDic(varKey)
Next

请注意,密钥迭代器必须声明为Variant