Renklendirme

[bright04]

Hayırlı Cuma'lar arkadaşlar,
Ekte açıklamasını verdiğim konu hakkında yardımlarınızı rica ederim

Saygılarımla,

 

[Erdal]

Merhabalar
Eki inceleyiniz.

 

[bright04]

Erdal bey,
çok teşekkür ederim, Ancak istediğim sonucu vermemiş, çünkü sizin renklendirdiğiniz değerler B kolonunda yok.

 

[bright04]

Sayın arkadaşlar, bu soruyu çözebilecek yokmu?

 

[asi_kral]

Hayırlı Cuma'lar arkadaşlar,
Ekte açıklamasını verdiğim konu hakkında yardımlarınızı rica ederim

Saygılarımla,

Merhaba
A sütununu Seçin
Koşullu Biçimlendirme - Kuralları Yönet - Yeni Kural - Biçilendirilecek hücreleri belirlemek için formül kullan - Kutucuğa

=EĞERSAY($B:$B;$A1)>0

Bu formülü yazın ve Biçim'den dolgu ve yazı rengini seçin. 3 Kere Tamam deyin Sonuçları Gözlemleyin.

Dosyanız Ekte

 

[Murat OSMA]

Ayrıca makro ile yapmak isterseniz aşağıdaki kodu kullanabilirsiniz...

Sub murat()
    Dim bul As Range, i As Integer
    For Each bul In Range("A1:A210")
    For i = 1 To Range("B65536").End(3).Row
    If Cells(i, "B").Value = bul.Value Then bul.Interior.ColorIndex = 3
    Next i: Next bul: i = Empty: Set bul = Nothing
End Sub

 

[bright04]

Arkadaşlar emeğinize çok teşekkür ederim
Saygılarımla

 

[asi_kral]

Arkadaşlar emeğinize çok teşekkür ederim
Saygılarımla

Kolay Gelsin.