Dictionary オブジェクト（連想配列）に登録されたキー（key）をまとめて取得する（Excel VBA）

【本日のミッション】

Excel VBAで、Dictionary オブジェクト（連想配列）に登録されたキー（key）をまとめて取得せよ。

ミッションの概要

Dictionary オブジェクト（連想配列）「dic_d」に登録されているキー（key）全てを、セル範囲A2:A6に書き出すのが、今回のミッションです。

Keysメソッドで全てのキー（key）を配列に格納→セルに書き出し

Keysメソッドは登録済のキー（key）全てを配列のまとまりにして返します。

Dictionaryオブジェクト.Keys

 

下記プロシージャは、Dictionaryオブジェクト「dic_d」のキー(key)全てを配列ary_keyに格納し、配列ary_keyからセル範囲A2:A6に書き出しています。

Dictionaryオブジェクトから配列にデータを格納すると1次元配列になるので、縦横を入れ替えるWorksheetFunction.Transposeメソッドを使用して、セルに書き出します。

ary_key = dic_d.Keys
Range("A2:A6") = Application.WorksheetFunction.Transpose(ary_key)

↓↓↓↓↓↓↓配列のインデックス番号は0(ゼロ)から始まります。

↓↓↓↓↓↓↓↓↓↓↓

参考

Dictionary オブジェクト（連想配列） とは ビッグデータ高速処理を可能にする技 (Excel VBA)
セル範囲を一気に変数（配列）に入れる ～バリアント型(Variant)変数を配列として使用する～（Excel VBA）
重複しないユニークなリスト作成 ～Dictionaryオブジェクト（連想配列）を使う1～ (Excel VBA)
重複しないユニークなリスト作成 ～Dictionaryオブジェクト（連想配列）を使う２～ (Excel VBA)
Dictionary オブジェクト(連想配列) CreateObject関数を使う方法・ 参照設定を使う方法 違いを理解してエラー防止（Excel VBA）
Dictionary オブジェクトに新しくキー（key）を登録し、値（item）を関連付ける（Excel VBA）
Dictionary オブジェクト 実行時エラー 457 を出さないために 指定したキー（key）が登録されているか確認する（Excel VBA）
Dictionary オブジェクト（連想配列）に登録されたキー（key）を、インデックス番号を指定して取得する（Excel VBA）
Dictionary オブジェクト（連想配列）に登録されたキー（key）を変更する（Excel VBA）
Dictionary オブジェクト（連想配列）に登録されたキー（key）をまとめて取得する（Excel VBA）

■スポンサーリンク

■ランキングに参加しています。
↓このブログを気に入っていただけましたら、ポチッとお願いします。
人気ブログランキングへ