VBAを用いて複数のシートの重複する列の色を変える方法

Question

目標は複数のシートの重複する列の色を変える事です。
ただし、重複する列の最初の１回目だけは色を変えずに、2回目以降重複する列のみ色を変えたいです。

例
1枚目シート
田中 ←色は変えない
田中 ←色を変える
山田 ←色は変えない
田中 ←色を変える
山田 ←色を変える

2枚目シート

田中 ←色を変える
山田 ←色を変える

また、シートの数は決まっていません。
現在は単一のシート内で重複する列の色を変えるという初歩的な事は出来たのですが、上記の条件を満たすコードはどのようなものになるでしょうか？
分かりにくい質問ですいません。
よろしくお願い致します。

Comments

[kikukiku]

単一のシート内では出来ているとのことなので、そのコードを開示することと、複数シートにした場合で何かしらやったことがあるはずです。このように改修したら、こんなエラーが出て先に進めないなどのより具体的な質問にした方が良いと思いました。

Answer 1

過去の回答にExcel重複データのチェックのVBAがあると思いますが、
参考https://teratail.com/questions/92940

ここでループでcounterで重複数をカウントしながら、セルの色を変更しています。
１回目だけは色を変えずにするのはcounter = 0の時に色を変更しないようにすればいいと思います。

シートについては、シートの数を取得してシートごとにループさせればOKです。
参考http://bayashita.com/p/entry/show/114