Dictionary

Scripting.DictionaryをLate Bindingで使い、A列の値を重複集計します。結果は専用シートへ出して入力データを消しにくくします。