連想配列（Dictionary）③-キー一覧を取得する方法と高速化のテクニック-

キー一覧を入力するのが面倒？

連想配列（Dictionary）を使用するようになって行数の多いデータの加工が楽になったのですが、連想配列を使用する際によく使う「キーの一覧を別シートに出力する方法」がないか調べてみたのでその手順についてご紹介します。

連想配列のキー一覧を出力するケースとしては、SUMIFS関数の代わりに連想配列を使用した場合などがあります。
キー一覧を別シートに出力して、その右に連想配列に格納されている集計結果を表示させることが多いと思います。

これを知らないとせっかく連想配列を用いていても、別シートを作成する際に元シートのキー部分をコピーして貼り付け後に重複削除をするという面倒な手順を踏むことになります。

サンプルシート

サンプルシートは前回こちらの記事で使ったものと同じものになります。
商品の売り上げ一覧表の中で商品ごとの金額の合計を別シートに出力する用途をイメージしたものです。

前回ご紹介したコードでは、すでに重複のないJANコードの一覧はすでに別シートに出力している状態でVBAを実行していましたが、今回はその重複のないJANコード一覧も出力するフローを想定しています。

スポンサーリンク

連想配列のキー一覧を出力する方法①-Keysプロパティを使用-

まずオーソドックスな方法です。
連想配列に格納後、Keyプロパティでキーの一覧を取得します。

前回ご紹介したコードとほぼ同じですが、連想配列の宣言の時に参照設定を使用する方法にしないとKeyプロパティは参照できないようです。

この方法で当初コードを書いていたのですが、Keys一覧の出力がものすごく遅くて悲しくなります。
せっかく連想配列を使用しているのが台無しになるレベルでした。

そのため、次の方法を検討してみました。

連想配列のキー一覧を出力する方法②-通常の配列を使用する

連想配列を使用する一番の理由は重複を判定するメソッドがあることですので、こちらを活用してキーを別の配列に格納する方法を考えました。

具体的にはキーとアイテムを連想配列に格納するタイミングで、キーを別の配列に格納しておいて、後でキーを格納した配列を呼び出すというフローです。

こちらのコードを実行すると明らかに先ほどのコードよりも高速なことが確認できました。
連想配列のキーを取り出す必要がある場合、別の配列にキーの一覧を格納して取得するフローが一番高速になると思います。

連想配列を使用する際の最速の処理方法について

キーを取り出す場合以外に、①連想配列にキーとアイテムを格納する際や、②連想配列の一覧を出力する際も配列を使用することでより高速化することが可能です。

使用するのはセルを二次元配列に格納して一気に値を取得・値を入力する方法になります
興味がある方はこちらのページをご参照ください。

今回の処理においては1秒以下の実行時間まで短縮できました。
セルを配列に格納する方法は慣れればすごく有効な手段になりますので、使いこなせるならぜひ覚えていただくのをおすすめします。