Iterate über VBA-Wörterbücher?

Question

Ich verwende die Dictionary-Klasse in der MS Runtime Scripting-Bibliothek, um zu speichern, wo Beschriftungen für eine Berichtsvorlage verwendet werden. Gibt es eine Möglichkeit, wie in Python über alle Schlüsselwertpaare in diesem Wörterbuch zu iterieren? Ich möchte nur den Schlüssel als Zeilennummer verwenden (es geht alles in Spalte A) und der Wert wird der Etikettenkopf sein.

Etwas wie:

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

Answer 1

Versuchen:

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