मैक्रो के साथ कोशिकाओं की जांच कैसे करें
क्या आप कक्षों का मूल्यांकन करना चाहते हैं और यह निर्धारित करना चाहते हैं कि एक श्रेणी में कितने कक्ष भरे गए हैं और कितने नहीं हैं? निम्नलिखित आंकड़ा एक उदाहरण दिखाता है:
A1: B7 मार्कर में कुछ खाली सेल और कुछ भरे हुए सेल होते हैं। यदि आप मैक्रो में इसका मूल्यांकन करना चाहते हैं, तो आप निम्न प्रोग्राम कोड का उपयोग कर सकते हैं:
सब काउंट्सफिल्डसेल्स ()
मंद संख्या जितनी लंबी हो
मंद संख्या2 जितनी लंबी हो
रेंज के रूप में मंद क्षेत्र
एक स्ट्रिंग के रूप में मंद करें
क्षेत्र निर्धारित करें = चयन
संख्या = आवेदन। गणना (क्षेत्र)
काउंट २ = एरिया। सेल्स।काउंट - नंबर
a = MsgBox ("वर्तमान चयन में हैं" _
और संख्या और "कोशिकाएं भरी गईं और" और संख्या 2 _
& "सेल खाली।", VbOKOnly, "सेल्स का मूल्यांकन करें")
अंत उप
मैक्रो फ़ंक्शन सेट करता है काउंटए किसी श्रेणी में गैर-रिक्त कक्षों की संख्या की गणना करने के लिए। परिणाम चर बचाता है संख्या. भरे हुए कक्षों की संख्या निर्धारित करने के लिए, यह मान जांचे गए कुल कक्षों की संख्या से घटाया जाता है। मैक्रो इस मान को सहेजता है नंबर 2.
प्रारंभ के बाद, प्रोग्राम कोड सक्रिय अंकन में भरे और खाली कक्षों की संख्या निर्धारित करता है और परिणाम को एक विंडो में प्रदर्शित करता है:
यदि आप वर्तमान चयन के बजाय अपनी पसंद की श्रेणी को संसाधित करना चाहते हैं, तो मान असाइनमेंट को चर के अनुकूल बनाएं क्षेत्र पर। इसका उपयोग मैक्रो में संपत्ति के साथ किया जाता है चयन जुड़े हुए। यदि आप इसके बजाय स्वयं एक श्रेणी परिभाषित करना चाहते हैं, तो इसे बदलें सेट-चर को असाइनमेंट क्षेत्र निम्नलिखित रूप की अभिव्यक्ति द्वारा:
सेट रेंज = रेंज ("A1: B5")
श्रेणी विनिर्देश हमेशा सक्रिय कार्यपत्रक को संदर्भित करता है। यदि आप किसी अन्य वर्कशीट को संबोधित करना चाहते हैं, तो उसके सामने रखें श्रेणीविधियों के संदर्भों को कमांड करें कार्यपुस्तिकाएं तथा शीट्स स्थिर।
