एक्सेल में VBA का उपयोग करके कॉलम में डेटा के साथ पंक्तियों की गणना कैसे करें (9 तरीके)

  • इसे साझा करें
Hugh West

विषयसूची

यदि आप Excel VBA का उपयोग करके कॉलम में डेटा के साथ पंक्तियों की गणना करने के कुछ सबसे आसान तरीकों की तलाश कर रहे हैं, तो आप सही जगह पर हैं। इसलिए, कॉलम में डेटा के साथ पंक्तियों की गणना आसानी से करने के बारे में अधिक जानने के लिए अपने मुख्य लेख से शुरू करते हैं।

कार्यपुस्तिका डाउनलोड करें

डेटा के साथ पंक्तियों की गणना करें।xlsm

एक्सेल वीबीए का उपयोग करके कॉलम में डेटा के साथ पंक्तियों की गणना करने के 9 तरीके

यहां, हमारे पास कंपनी के बिक्री रिकॉर्ड वाले निम्नलिखित डेटासेट हैं। कॉलम के डेटा के आधार पर पंक्तियों की गणना करने के विभिन्न तरीकों की व्याख्या करने के लिए हम इस डेटासेट के डेटा के साथ विभिन्न कॉलम का उपयोग करेंगे।

हमने Microsoft Excel 365<का उपयोग किया है। 10> संस्करण यहां, आप अपनी सुविधा के अनुसार किसी भी अन्य संस्करण का उपयोग कर सकते हैं। पंक्तियों का उपयोग करने वाले उत्पादों के लिए बिक्री मूल्यों के साथ बिक्री स्तंभ की पंक्तियों की गणना की जाएगी। VBA की संपत्ति की गणना करें

चरण-01 :

➤ <1 पर जाएं>डेवलपर टैब >> विजुअल बेसिक ऑप्शन।

फिर, विजुअल बेसिक एडिटर खुल जाएगा .

सम्मिलित करें टैब >> मॉड्यूल विकल्प

उसके बाद, एक मॉड्यूल बनाया जाएगा।

स्टेप-02 :

➤ निम्नलिखित कोड लिखें

4519

यहाँ, हमने X को पूर्णांक के रूप में घोषित किया है, "D4:D11" के आधार पर सीमा हैकिस कॉलम में हम पंक्तियों की गिनती कर रहे हैं और अंत में हमने X को पंक्ति संख्या निर्दिष्ट की है।

एक संदेश बॉक्स ( MsgBox ) हमें कुल संख्या के रूप में परिणाम देगा पंक्तियों की संख्या।

F5 दबाएं।

फिर, आपको डेटा के साथ पंक्तियों की कुल संख्या के रूप में मिलेगी संदेश बॉक्स में बिक्री स्तंभ का 8

अधिक पढ़ें: डेटा के साथ पंक्तियों की गणना करने के लिए एक्सेल VBA (4 उदाहरण)

विधि-2: कॉलम में डेटा के साथ पंक्तियों की गणना करने के लिए अंतिम संपत्ति का उपयोग करना

इस अनुभाग में, हम इसका उपयोग करेंगे VBA की अंतिम संपत्ति बिक्री कॉलम के बिक्री मूल्यों के साथ पंक्तियों की गणना करने के लिए।

चरण :

विधि-1 के चरण-01 का पालन करें।

➤ निम्नलिखित कोड लिखें

4223

यहां, हमने X को पूर्णांक , "D4" के रूप में घोषित किया है, जो उस श्रेणी का प्रारंभ मूल्य है जिसके आधार पर हम पंक्तियों की गणना कर रहे हैं और अंत में हमने X को पंक्ति संख्या निर्दिष्ट की है। X हमें अंतिम उपयोग की गई पंक्ति संख्या देगा न कि इस कॉलम की कुल उपयोग की गई पंक्तियां। इसलिए, कुल पंक्ति संख्या प्राप्त करने के लिए हमने X से 3 ( प्रारंभिक पंक्ति संख्या-1 = 4-1 = 3 ) घटाया है।

एक संदेश बॉक्स ( MsgBox ) पंक्तियों की कुल संख्या के साथ दिखाई देगा।

F5 दबाएं।<3

उसके बाद, आपके पास 8 संदेश बॉक्स में बिक्री कॉलम की पंक्तियों की कुल संख्या के रूप में होगा।

और पढ़ें: कैसे गिनेंएक्सेल में डेटा के साथ पंक्तियाँ (4 सूत्र)

विधि-3: पंक्तियों के संयोजन का उपयोग करना। संपत्ति की गणना करें और संपत्ति समाप्त करें

यहां, हम दो गुणों के संयोजन का उपयोग करेंगे VBA की पंक्तियों की तरह। बिक्री स्तंभ

की कुल पंक्तियों की गणना करने के लिए गुण और अंतिम गुण एक साथ गिनें। चरण :

विधि-1 का चरण-01 का पालन करें।

➤ निम्नलिखित कोड लिखें

6512

यहां, हमने X को पूर्णांक के रूप में घोषित किया है, 4 में (पंक्तियां. गणना, 4) बिक्री के लिए है कॉलम जिसके आधार पर हम पंक्तियों की गणना कर रहे हैं और अंत में हमने X को पंक्ति संख्या निर्दिष्ट की है।

X अंतिम उपयोग की गई पंक्ति लौटाएगा इस कॉलम की कुल उपयोग की गई पंक्तियों की संख्या नहीं। इसलिए, कुल पंक्ति संख्या प्राप्त करने के लिए हमने X से 3 ( प्रारंभिक पंक्ति संख्या-1 = 4-1 = 3 ) घटाया है।

एक संदेश बॉक्स ( MsgBox ) पंक्तियों की कुल संख्या के साथ दिखाई देगा।

F5 दबाएं।<3

बाद में, हमें 8 एक संदेश बॉक्स में बिक्री कॉलम की पंक्तियों की कुल संख्या के रूप में मिलेगा।

संबंधित सामग्री: एक्सेल में एकाधिक मानदंड के साथ पंक्तियों की गणना कैसे करें (6 विधियाँ)

विधि -4: एक्सेल में कॉलम में डेटा के साथ पंक्तियों की गणना करने के लिए VBA चयन संपत्ति का उपयोग करना

आप चयन गुण का उपयोग बिक्री के डेटा के आधार पर कुल पंक्तियों की गणना करने के लिए भी कर सकते हैं कॉलम.

कदम :

तरीके के कदम-01 का पालन करें -1

➤ निम्नलिखित कोड लिखें

3667

यहाँ, हमने X को पूर्णांक के रूप में घोषित किया है, चयनित की पंक्तियाँ रेंज की यहां गणना की जाएगी, और अंत में, हमने X को पंक्ति संख्या निर्दिष्ट की है।

एक संदेश बॉक्स ( MsgBox ) हमें कुल के रूप में परिणाम देगा पंक्तियों की संख्या।

फिर, हमें मुख्य शीट पर वापस जाना होगा।

बिक्री कॉलम की श्रेणी का चयन करें , और फिर, डेवलपर टैब >> मैक्रोज़ विकल्प पर जाएं।

उसके बाद, मैक्रो डायलॉग बॉक्स पॉप अप होगा।

मैक्रो नाम काउंट्रो4 चुनें और फिर रन दबाएं विकल्प।

अंत में, हमें निम्नलिखित संदेश बॉक्स मिलेगा जिसमें लिखा होगा "उपयोग की गई पंक्तियों की संख्या 8 है"

<0

और पढ़ें: एक्सेल में VBA के साथ पंक्तियों की गणना कैसे करें (5 तरीके)

विधि-5: FIND फ़ंक्शन का उपयोग करके कॉलम में डेटा के साथ पंक्तियों की गणना करें

यहाँ, हम इसका उपयोग करेंगे FIND फ़ंक्शन क्षेत्र कॉलम में टेक्स्ट स्ट्रिंग वाली पंक्तियों की गणना करने के लिए

चरण :

विधि-1 के चरण-01 का पालन करें।

➤ निम्नलिखित कोड लिखें

5923

यहाँ, हमने घोषित किया है X as पूर्णांक , rng as रेंज , "C4:C11" के आधार पर रेंज है हम किस कॉलम में पंक्तियों की गिनती कर रहे हैं और अंत में हमने इसे असाइन कर दिया है rng

हमने rng जैसे ऑब्जेक्ट नाम का उपयोग करने की पुनरावृत्ति से बचने के लिए with कथन का उपयोग किया है।

FIND फ़ंक्शन का उपयोग करने से, X हमें अंतिम उपयोग की गई पंक्ति संख्या मिलेगी न कि इस कॉलम की कुल उपयोग की गई पंक्तियां। इसलिए, कुल पंक्ति संख्या प्राप्त करने के लिए हमने X से 3 ( प्रारंभिक पंक्ति संख्या-1 = 4-1 = 3 ) घटाया है।

एक संदेश बॉक्स ( MsgBox ) पंक्तियों की कुल संख्या के साथ दिखाई देगा।

F5 दबाएं।<3

अंत में, आपके पास 8 संदेश बॉक्स में बिक्री कॉलम की पंक्तियों की कुल संख्या के रूप में होगा।

संबंधित सामग्री: एक्सेल काउंट विजिबल रो (फॉर्मूला और VBA कोड)

समान रीडिंग:

  • काउंट रो एक्सेल में पिवोट टेबल के साथ समूह में (चरण-दर-चरण दिशानिर्देश)
  • एक्सेल VBA: एक शीट में पंक्तियों की गणना करें (5 उदाहरण)

विधि -6: VBA

का उपयोग करके कॉलम में डेटा के साथ गैर-खाली पंक्तियों की गणना करें बिक्री कॉलम में हमारे पास कुछ खाली सेल हैं (हमने इस विधि के लिए कुछ मान हटा दिए हैं) और VBA कोड का उपयोग करके हम केवल मानों वाली पंक्तियों की कुल संख्या की गणना करेंगे।

चरण :

विधि-1 का चरण-01 का पालन करें।

➤ निम्नलिखित कोड लिखें

8815

यहाँ, हमने घोषित किया है X as Long , Y , और rng as Range , "D4:D11" वह सीमा है जिसके आधार पर हम पंक्तियों की गिनती कर रहे हैं और अंत में हमारे पास हैइसे rng को असाइन किया गया है।

FOR लूप यह जांच करेगा कि इस श्रेणी के प्रत्येक सेल में COUNTA फ़ंक्शन का उपयोग करके कोई मान है या नहीं और मान वाले सेल के लिए, X हर बार 1 से वृद्धि की जाएगी।

अंत में, हम एक संदेश के माध्यम से गैर-खाली कोशिकाओं के साथ कुल पंक्ति संख्या प्राप्त करेंगे box.

F5 दबाएं।

आखिरकार, आपके पास 5 की कुल संख्या होगी संदेश बॉक्स में बिक्री कॉलम की गैर-खाली पंक्तियां।

और पढ़ें: VBA के साथ Excel में फ़िल्टर की गई पंक्तियों की गणना कैसे करें ( चरण-दर-चरण दिशानिर्देश)

विधि -7: एक विशिष्ट मूल्य के साथ पंक्तियों की गणना करें

यहां, हम के बिक्री मूल्य के साथ पंक्तियों की कुल संख्या की गणना करेंगे $2,522.00 बिक्री कॉलम से।

कदम :

कदम का पालन करें -01 का विधि-1

➤ निम्नलिखित कोड लिखें

9939

यहाँ, हमने X को घोषित किया है Long , Y , और rng as Range , "D4:D11" वह रेंज है जिसके आधार पर कॉलम में हम पंक्तियों की गिनती कर रहे हैं और अंत में हमने इसे rng को असाइन कर दिया है।

FOR लूप यह जांच करेगा कि इस श्रेणी के किसी भी सेल में बिक्री मूल्य है या नहीं 2522 COUNTIF फ़ंक्शन का उपयोग करके और इस मान वाले सेल के लिए, X हर बार 1 द्वारा बढ़ाया जाएगा।

अंत में, हम एक संदेश के माध्यम से 2522 के मान के साथ कुल पंक्ति संख्या प्राप्त करेंगेbox.

F5 दबाएं।

आखिरकार, आपके पास 3 कुल संख्या पंक्तियां होंगी एक संदेश बॉक्स में बिक्री कॉलम जिसमें $2,522.00 का बिक्री मूल्य शामिल है।

और पढ़ें: एक्सेल VBA: विशिष्ट डेटा के साथ पंक्तियों की गणना करें (8 उदाहरण)

विधि -8: विशिष्ट मान से अधिक मान वाली पंक्तियों की गणना करें

इस खंड में, हम बिक्री कॉलम

<में $3000.00 से अधिक मान वाली पंक्तियों की कुल संख्या की गणना करें। 1>चरण :

विधि-1 के चरण-01 का पालन करें।

➤ निम्नलिखित कोड लिखें

5813

यहां, हमने X को लॉन्ग , Y , और rng को रेंज , "D4:D11" वह श्रेणी है जिसके आधार पर हम पंक्तियों की गणना कर रहे हैं और अंत में हमने इसे rng को असाइन किया है।

FOR लूप जांच करेगा कि इस श्रेणी के किसी भी सेल में COUNTIF फ़ंक्शन का उपयोग करके 3000 से अधिक बिक्री मूल्य है या नहीं (या आप किसी अन्य के लिए प्रयास कर सकते हैं स्थितियाँ जैसे इससे कम, इससे अधिक, या इसके बराबर, आदि) और इस मान वाले सेल के लिए, X को हर बार 1 द्वारा बढ़ाया जाएगा।

अंत में, हम संदेश बॉक्स के माध्यम से 3000 से अधिक मान वाली कुल पंक्ति संख्या प्राप्त करेंगे।

F5 दबाएं।

बाद में, आपके पास 3 बिक्री वाले कॉलम बिक्री की कुल संख्या पंक्तियों के रूप में होगीएक संदेश बॉक्स में $3,000.00 से अधिक मूल्य। तरीके)

विधि-9: एक विशिष्ट पाठ स्ट्रिंग के साथ पंक्तियों की गणना करें

हमें यहां पंक्तियों की संख्या मिल जाएगी जिसमें सेब उत्पाद स्तंभ में बिल्कुल या आंशिक रूप से।

चरण :

चरण का पालन करें- 01 का विधि-1

➤ निम्नलिखित कोड लिखें

2448

यहाँ, हमने X को लंबा घोषित किया है , Y , और rng as Range , "B4:B11" किस कॉलम के आधार पर हम पंक्तियों की गिनती कर रहे हैं और अंत में हमने इसे rng को असाइन कर दिया है।

FOR लूप यह जांच करेगा कि इस श्रेणी के किसी भी सेल में टेक्स्ट स्ट्रिंग है या नहीं "लागू करें" COUNTIF फ़ंक्शन का उपयोग करके (यहां, यह तारांकन चिह्न स्ट्रिंग से पहले और बाद के प्रतीक का उपयोग करके सटीक मिलान और आंशिक मिलान दोनों के लिए गिना जाएगा), और इस मान वाले कक्षों के लिए, X प्रत्येक समय 1 से बढ़ाया जाएगा e.

आखिरकार, हम टेक्स्ट स्ट्रिंग सेब के साथ संदेश बॉक्स के माध्यम से कुल पंक्ति संख्या प्राप्त करेंगे।

F5 दबाएं।

फिर, आपके पास 2 उत्पाद कॉलम में टेक्स्ट स्ट्रिंग्स की कुल संख्या के रूप में होगा। संदेश बॉक्स में सेब और अनानास

और पढ़ें: एक्सेल में टेक्स्ट के साथ पंक्तियों की गणना कैसे करें (सबसे आसान8 तरीके)

प्रैक्टिस सेक्शन

खुद से प्रैक्टिस करने के लिए हमने प्रैक्टिस नाम की शीट में नीचे की तरह एक प्रैक्टिस सेक्शन दिया है अभ्यास . कृपया इसे स्वयं करें।

निष्कर्ष

इस लेख में, हमने एक्सेल <1 का उपयोग करके एक कॉलम में डेटा के साथ पंक्तियों की गणना करने के तरीकों को कवर करने का प्रयास किया।> वीबीए आसानी से। आशा है आपको यह उपयोगी लगेगा। यदि आपके कोई सुझाव या प्रश्न हैं, तो बेझिझक उन्हें टिप्पणी अनुभाग में साझा करें।

ह्यूग वेस्ट उद्योग में 10 से अधिक वर्षों के अनुभव के साथ एक अत्यधिक अनुभवी एक्सेल ट्रेनर और विश्लेषक है। उनके पास लेखा और वित्त में स्नातक की डिग्री और व्यवसाय प्रशासन में मास्टर डिग्री है। ह्यूग को पढ़ाने का शौक है और उन्होंने एक अद्वितीय शिक्षण दृष्टिकोण विकसित किया है जिसका पालन करना और समझना आसान है। एक्सेल के उनके विशेषज्ञ ज्ञान ने दुनिया भर में हजारों छात्रों और पेशेवरों को अपने कौशल में सुधार करने और अपने करियर में उत्कृष्टता हासिल करने में मदद की है। अपने ब्लॉग के माध्यम से, ह्यूग दुनिया के साथ अपने ज्ञान को साझा करता है, व्यक्तियों और व्यवसायों को उनकी पूरी क्षमता तक पहुंचने में मदद करने के लिए मुफ्त एक्सेल ट्यूटोरियल और ऑनलाइन प्रशिक्षण प्रदान करता है।