Excel Mükerrer Kayıtları Renklendirme

25/11/2011, 01:32

akay

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


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
25/11/2011, 16:19

DUAYEN

Örnek ekleyiniz.
26/11/2011, 23:01

schworse

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

26/11/2011, 23:45

schworse

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.
28/11/2011, 00:03

akay

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