VBA Dictionaryオブジェクトを使って配列の要素の合計数を集計する。
今回は、数え上げはDictionaryオブジェクトを使うと楽ですよという話。 やりたいこと 次のような配列がある。 Array("A", "A", "B", "C", "A", "B", "A") 次のように、それぞれの数を集計したい。 A= 4 B= 2 C= 1 コード 上記の要望は、以下のコードで実現できる。 Sub 数え上げ() arr = Array("A", "A", "B", "C", "A", "…
