VBA辞書を繰り返しますか？

Question

MSランタイムスクリプトライブラリのDictionaryクラスを使用して、レポートテンプレートのラベルの保存先を保存しています。 Pythonのようにその辞書のすべてのキーと値のペアを反復処理する方法はありますか？キーを行番号として使用するだけで（すべて列Aに入力されます）、値はラベルヘッダーになります。

何かのようなもの：

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

何かのようなもの：

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

EBGreen · Accepted Answer

試してください：

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

キーイテレータはVariantとして宣言する必要があることに注意してください。