هل من دالة تعد عدد الخلايا الملونه ؟

[جلال محمد]

الاخوة الكرام

السلام عليكم

هل من دالة تعد عدد الخلايا الملونة في العمود الواحد مرفق ملف يوضح المطلوب

وشكرا للجميع

___________________.rar

[ابو اسامة العينبوسي]

السلام عليكم

****هناك فرق بين الخلايا ذات الخلفيه البيضاء و الخلايا التى لالون لها

Function CountColors(myrng As Range)
Dim Cell As Range
For Each Cell In myrng
    If Cell.Interior.ColorIndex <> xlNone Then
    CountColors = CountColors + 1
    End If
Next
End Function

___________________.rar

[جلال محمد]

اخى الكريم ابو اسامه

السلام عليكم

جزاك الله كل خير علي سرعة ردك عمل رائع وكود جميل شكرا لك

ولكن هل توجد دله فقط بدون كود ؟