Renklerin Toplamı

[oekinci]

Arkadaşlar çok aradım bulamadım. Ekteki listedeki Beyaz renklerin toplamının eksik reçete kısmında yazmasını istiyorum nasıl yapabilirim...

 

[hamitcan]

http://www.excel.web.tr/showthread.php?t=34042

 

[Erhan Üstünel]

Ali hocamızın güzel çalışması var işine yarar sanırım

http://www.excel.web.tr/showthread.php?t=17627&highlight=RENKSAY

 

[oekinci]

excell 2007 de olmuyor bunlar yada ben yapamıyorum...

 

[hamitcan]

Formülü, bu şekilde kullanın.

=RenkSayN(E3:E13;16777215)

Fonksiyonu da aşağıdaki şekilde...

Function RenkSayN(Dizi As Range, Renk_Tipi)
Toplam = 0
Application.Volatile
For Each Hucre In Dizi
    If Hucre.Interior.Color = Renk_Tipi Then
        Toplam = Toplam + 1
    End If
Next
RenkSayN = Toplam
End Function

 

[oekinci]

2007 de renksay komutu yok yapamadım bir türlü

 

[hamitcan]

Verdiğim fonksiyon, yerleşik bir fonksiyon değil bu yüzden belirttiğim şekilde kullanmalısınız.