एमिली पूछती है:
कृपया आप उन कोशिकाओं की संख्या गिनने के लिए सूत्रीय समाधान की सलाह दे सकते हैं जिनमें एक विशेष बैकग्राउंड रंग है (यानी इन कोशिकाओं में कुछ डेटा होते हैं लेकिन रंग उन्हें गिनने के लिए क्या महत्वपूर्ण है)।
तार्किक रूप से मुझे लगता है कि इसे एक मानक सूत्र का पालन करना चाहिए
CountIF(A01:A55,"backgroundcolour=red")मेरा मानना है कि रंग लाल को 3 नंबर (मदद फ़ाइल के अनुसार) से पहचाना जाना चाहिए
मुझे यह जानना होगा कि बैकग्राउंड सेल कलर अर्थात कलरफिल को कैसे कोड किया जाए?
एमिली - अगर केवल यह इतना आसान था। आपको VBA में उपयोगकर्ता निर्धारित फ़ंक्शन होना चाहिए। नीचे फ़ंक्शन के लिए कोड है। आपको कार्यपुस्तिका में एक नए कोड मॉड्यूल में इसे दर्ज करने की आवश्यकता है।
कोड दर्ज करने के बाद, आप इस सूत्र का उपयोग कर सकते हैं:
=CountColor(A1:A99,D2)
जहाँ D2 की पृष्ठभूमि प्रारूप है जिसे आप गिनना चाहते हैं।
यहाँ कोड है:
Function CountColor(Rng As Range, RngColor As Range) As Integer Dim Cll As Range Dim Clr As Long Clr = RngColor.Range("A1").Interior.Color For Each Cll In Rng If Cll.Interior.Color = Clr Then CountColor = CountColor + 1 End If Next Cll End Function
