Hücre Rengi ve Hücre İçeriğine göre saydırma

[hedjaz]

merhabalar,

Ekte zamanında nejdet hocamın hazırladığı renge göre sayma, toplama özellikleri olan dosya mevcut. Ben buna bir de hücre içeriğindeki kelimeye göre saymayı da eklemek istiyorum. 2 kriterli saymayı nasıl yapabilirim. yardım olabilir misiniz?

şimdiden teşekkürler.

 

[hamitcan]

Bu şekilde deneyin.

Function Renge_Gore_Sayma(Alan As Range, Metin As String, Renk As Range)
    For Each hcr In Alan
        If hcr.Text Like "*" & Metin & "*" Then
        If hcr.Interior.ColorIndex = Range(Renk.Address).Interior.ColorIndex Then
        k = k + 1
        End If
        End If
    Next
    Renge_Gore_Sayma = k
End Function

 

[hedjaz]

Öncelikle dönüşünüz için teşekkürler. Yalnız bu formülün kullanımını anlayamadım. Koddaki &Metin& ve (Renk.Address) kısımlarına hedef içerikleri mi girmeliyim?
Eklediğim doküman üzerinde uygulamasını gösterirseniz çok sevinirim.

 

[hamitcan]

Dosyayı ekledim. Formülü kontrol edin, daha iyi anlayacaksınız.

 

[hedjaz]

Çok Teşekkürler. Elinize sağlık

 

[hedjaz]

Bu arada koşullu biçimlendirme ile yaptığım renklendirmede formül rengi saymıyor. ilginç geldi bana.

 

[Korhan Ayhan]

Bu tarz fonksiyonlar elle yapılan fiziksel renklendirmelerde sonuç vermektedir.

Koşullu biçimlendirmede sadece görsel olarak hücre renklendirmesi olmaktadır. Fiziksel bir renklendirme durumu yoktur.

Lİnklerde bu durumun nasıl aşılabileceği tarif edilmiştir.

https://www.excel.web.tr/threads/kosullu-bicimlendirme-conditional-formatting-cfr-ile-renklendirilmis-huecre-renk-kodunun-bulunmasi.196471/

Koşullu biçimlendirme ile renkli hücreleri sayma

son bu hocam

www.excel.web.tr