迭代VBA字典?

问题描述:

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

喜欢的东西:

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

尝试:

For Each strKey In oDic.Keys() 
    Range("A" & strKey).Value = oDic(strKey) 
Next 
+23

我想补充一点strKey应该被宣布'作为Variant',因为'对于Each'不工作'String's 。 – stenci 2013-09-09 16:03:20