büyük bir tablom var bu tabloda mükerrer kayıtları isaretlemem gerek asagıdaki kodu buldum çalışma sayfası kod görüntüle kısmına yazıyorum ama sadece a sutunundakileri tarayıp renklendiriyor

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
For a = [a65536].End(3).Row To 1 Step -1
If WorksheetFunction.CountIf(Range("a1:a" & a), Cells(a, "a")) > 1 Then Cells(a, "a").Interior.ColorIndex = 6
Next
End Sub

Ek Dosyalar

mükerrer.rar(13.88 KB)

ben ayrıca b ve c sutununu da ayrı ayrı taramasını ve b yi farklı c yi farklı renklendirmesini istiyorum

not:
1- a sutunundaki veri b sutununda olursa mükerrer olarak renklendirmeyecek sadece aynı sutundakileri renklendirmesi lazım
yardımcı olursanız sevinirim.
2- kod yazmaktan anlamam ne yapmam gerektigini yazarsanız sevinirim