重複数字を数えて出力する方法

質問

どなたたかご存知でしたらご回答宜しくお願い致します。
【質問】
　下図の様にＡ１~Ｅ５迄の２５個のセルに数字が１~３１迄重複して入っています。
　重複数字を数えて、４個重複から重複無しまで【重複チェック】に該当する数字
　を出力する方法が知りたいです。
【例】　　　　　　　【重複チェック】
07 12 14 18 19　　　４個重複：7
01 03 07 19 28　　　３個重複：19
02 03 07 13 31　　　２個重複：3,14
07 14 19 20 26　　　重複無し：1,2,12,13,18,20,26,28,31
◆注意事項
　・２個重複~４個重複のいずれかが０個という事はあり得ます。
　・【例】で書いてある数字は見やすくするため２桁で書いてあります。
　　　（１ではなく、０１としてあります。）
　・使用するエクセルは２０１０です。

以上、よろしくお願いします。

回答No.3

msMike

[No.1補足]へのコメント、
》 ＶＢＡとかでないと無理なのでしょうか？
そうだと思います。

回答No.2

HohoPapa

状況次第では5個重複したり
あるいは可能性として25個重複する可能性もあるんでしょうか？

また、重複チェックの結果は質問文のとおり、
3,14や、
1,2,12,13,18,20,26,28,31
といった複数の値の羅列になるものの、
セル上にどのように表現すればいいのか
質問文から読み取ることができません。

VBAを使わずに解決しようとするのであれば
埋まる数値が1-31と限定的ですので、
添付画像のような一覧を作成する方法が一般的と思いますし、
これ以上の解は困難と思います。
=COUNTIF($A$1:$E$5,"="&G2)

他方、
チェック結果をセル上にどのように表現すればいいのかを明示してもらえれば
VBAでの解を提示することは可能です。
VBAは扱えますか？

補足

ご回答ありがとうございます。

＞状況次第では5個重複したり
＞あるいは可能性として25個重複する可能性もあるんでしょうか？
　質問文の下にも書きましたが、重複するのは４個迄です。

＞セル上にどのように表現すればいいのか
＞質問文から読み取ることができません。

　特に出力先の指定まではしてません。
　例題にあるように少し右側に出ればよいです。Ｉ列から右へ。

＞VBAは扱えますか？
　扱えません。

回答No.1

msMike

添付図参照
１．６行目の左端 A6 から右に数値 1、2、3、…、31 を入力
２．式 =IF(COUNTIF($A$1:$E$4,A6),COUNTIF($A$1:$E$4,A6),"") を
￣￣入力したセル A7 を右方にズズーッとオートフィル
３．セル A9 から下方に数値 4、3、2、1 を入力
４．セル F9 に次式を入力して、此れを下方３行にオートフィル
￣￣ =IFERROR(SMALL(IF($A$7:$AE$7=$A9,$A$6:$AE$6),COLUMN(A1)),"")
￣￣【お断り】上式は必ず配列数式として入力のこと
５．範囲 A9:A12 を右方にズズーッとオートフィル

補足

ご回答ありがとうございます。

質問しておいて申し訳ありませんが、
一旦、数字の数を数えた後に、まとめるやり方以外に
例題に書いた様な直接、右側に結果が出るというのは
ＶＢＡとかでないと無理なのでしょうか？