Dictionaryに配列を格納して、入れ子として使用する優位性はこちらの記事で紹介しました。
入れ子の配列の要素を、変更や更新したい場合はどうしたらよいでしょうか?
配列を入れなおす必要性があります。
Dictionary内のアイテム(配列要素)を更新するサンプルコード
'参照設定 Microsoft Scripting Runtime Public Sub sample() Dim arr As Variant Dim dic As Dictionary Set dic = New Dictionary '■配列を作成 arr = Array(100, 200, 300, 400, 500, 600) '■配列をdicに格納する dic.Add "num", arr '■配列から単独の値に変更。 dic("num") = 2000 Debug.Print dic.Item("num") '2000 '■配列から配列に変更可能。 dic("num") = Array(100, 200, 300, 400, 500, 600) dic("num") = Array("a", "b", "c") Debug.Print dic.Item("num")(0) 'a End Sub
コメント