連想配列をループで処理する方法(その１)

【目的】
VBAで連想配列を使用する際に、連想配列をループで処理します。



【手順】
１．「標準モジュールの作成方法」の手順で、「MainModule」とい標準モジュールを作成。
２．「MainModule」を以下の様に入力。

Option Explicit

Sub main()
    Dim map As Object
    Dim keys As Variant
    Dim i As Integer
    
    Set map = CreateObject("Scripting.Dictionary")
    
    map.Add "key1", "value1"
    map.Add "key2", "value2"
    map.Add "key3", "value3"
    
    keys = map.keys
    
    For i = 0 To map.Count - 1
        Debug.Print ("key=" & keys(i) & ", value=" & map(keys(i)))
    Next
End Sub

３．「関数を実行する方法」の手順で、main関数を実行。
４．イミディエイトウィンドウが表示されない場合は、「イミディエイトウィンドウの表示方法」でイミディエイトウィンドウを表示させます。
５．以下の様に、イミディエイトウィンドウに以下の様に、出力されれば成功です。

以上です。