AccessTr.neT

Tam Versiyon: Excel Mükerrer Kayıtları Renklendirme
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
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
Örnek ekleyiniz.
Merhaba;

Yazdıklarınıza göre bir örnek hazırladım kontrol edebilirmisiniz. İlk satırda Renk kodlarını rakamları değiştirerek farklı renklere çevirebilirsiniz.

Kolay gelsin.

Ek Dosyalar
 Mükerrer_Schworse.rar(12.54 KB)
Merhaba;

Renk alanına giriş yapabileceğiniz 1-56 arası renk var(RGB İndex No)

1 Black
2 White
3 Red
4 Green
5 Blue
6 Yellow
7 Magenta
8 Cyan

8 Renk 7 araton var (8 X 7 = 56) toplam 56 renk tonunu kullanabilirsiniz.

Kolay gelsin.
Eyvallah hocam tam istediğim gibi çok teşekkürler.