एक्सेलमा VBA प्रयोग गरेर स्तम्भमा डाटाको साथ पङ्क्तिहरू कसरी गणना गर्ने (9 तरिकाहरू)

  • यो साझा गर्नुहोस्
Hugh West

सामग्री तालिका

यदि तपाइँ एक्सेल VBA को प्रयोग गरेर स्तम्भमा डेटाको साथ पङ्क्तिहरू गणना गर्ने केही सजिलो तरिकाहरू खोज्दै हुनुहुन्छ भने, तपाइँ सही ठाउँमा हुनुहुन्छ। त्यसोभए, सजिलैसँग स्तम्भमा डेटाको साथ पङ्क्तिहरू गणना गर्ने बारे थप जान्नको लागि हाम्रो मुख्य लेखबाट सुरु गरौं।

कार्यपुस्तिका डाउनलोड गर्नुहोस्

Data.xlsm सँग पङ्क्तिहरू गणना गर्नुहोस्

एक्सेल VBA प्रयोग गरेर स्तम्भमा डाटासँग पङ्क्तिहरू गणना गर्ने ९ तरिका

यहाँ, हामीसँग कम्पनीको बिक्री रेकर्डहरू समावेश गर्ने निम्न डेटासेटहरू छन्। हामी स्तम्भको डेटामा आधारित पङ्क्तिहरू गणना गर्ने विभिन्न तरिकाहरू व्याख्या गर्न यस डेटासेटबाट डेटासहित विभिन्न स्तम्भहरू प्रयोग गर्नेछौं।

हामीले Microsoft Excel 365<प्रयोग गरेका छौं। 10> यहाँ संस्करण, तपाइँ तपाइँको सुविधा अनुसार कुनै पनि अन्य संस्करणहरू प्रयोग गर्न सक्नुहुन्छ।

विधि-1: VBA पङ्क्तिहरू प्रयोग गर्दै। Excel मा स्तम्भमा डेटाको साथ पङ्क्तिहरू गणना गर्न गुणहरू गणना गर्नुहोस्

यहाँ, हामी पङ्क्तिहरू प्रयोग गरेर उत्पादनहरूका लागि बिक्री मानहरू सहित बिक्री स्तम्भको पङ्क्तिहरू गणना गरिनेछ। VBA को गुणहरू गणना गर्नुहोस्।

चरण-01 :

➤ <1 मा जानुहोस्>विकासकर्ता ट्याब >> भिजुअल बेसिक विकल्प।

14>

त्यसपछि, भिजुअल बेसिक सम्पादक खुल्नेछ। .

➤ जानुहोस् Insert ट्याब >> मोड्युल विकल्प।

15>

त्यसपछि, a Module बनाइनेछ।

Step-02 :

➤ निम्न कोड लेख्नुहोस्

5594

यहाँ, हामीले X लाई Integer , “D4:D11” को आधारमा दायरा हो भनेर घोषणा गरेका छौं।हामी कुन स्तम्भमा पङ्क्तिहरू गणना गर्दैछौं र अन्तमा हामीले X लाई पङ्क्ति नम्बर तोक्यौं।

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

F5 थिच्नुहोस्।

त्यसपछि, तपाईंले को रूपमा डेटा सहित पङ्क्तिहरूको कुल संख्या प्राप्त गर्नुहुनेछ। सन्देश बाकसमा बिक्री स्तम्भको 8

थप पढ्नुहोस्: Excel VBA  डेटाका साथ पङ्क्तिहरू गणना गर्न (4 उदाहरणहरू)

विधि-2: स्तम्भमा डेटासँग पङ्क्तिहरू गणना गर्न अन्तिम सम्पत्ति प्रयोग गर्दै

यस खण्डमा, हामी प्रयोग गर्नेछौं VBA को बिक्री स्तम्भको बिक्री मानहरूसँग पङ्क्तिहरू गणना गर्नको अन्तिम गुण

चरणहरू :

➤ अनुसरण गर्नुहोस् चरण-01 को विधि-1

➤ निम्न कोड लेख्नुहोस्

9348

यहाँ, हामीले X लाई Integer को रूपमा घोषणा गरेका छौं, “D4” हामीले पङ्क्तिहरू गणना गर्ने स्तम्भको आधारमा दायराको सुरुवात मान हो। र अन्तमा हामीले X लाई पङ्क्ति नम्बर तोकेका छौं। X ले हामीलाई यो स्तम्भको कुल प्रयोग गरिएको पङ्क्ति नभई अन्तिम प्रयोग गरिएको पङ्क्ति नम्बर दिनेछ। त्यसैले, कुल पङ्क्ति नम्बर प्राप्त गर्न हामीले X बाट 3 ( सुरुवात पङ्क्ति नम्बर-1 = 4-1 = 3 ) घटाएका छौं।

एक सन्देश बक्स ( MsgBox ) पङ्क्तिहरूको कुल संख्याको साथ देखा पर्नेछ।

F5 थिच्नुहोस्।

त्यसपछि, तपाईंसँग सन्देश बाकसमा बिक्री स्तम्भको पङ्क्तिहरूको कुल संख्याको रूपमा 8 हुनेछ।

थप पढ्नुहोस्: कसरी गणना गर्नेएक्सेलमा डाटा सहितको पङ्क्तिहरू (४ सूत्रहरू)

विधि-3: रोउज. काउन्ट प्रोपर्टी र एन्ड प्रोपर्टीको संयोजन प्रयोग गर्दै

यहाँ, हामी दुई गुणहरूको संयोजन प्रयोग गर्नेछौं। को VBA जस्तै पङ्क्तिहरू। गुण गणना गर्नुहोस् अन्त गुण एकसाथ बिक्री स्तम्भको कुल पङ्क्तिहरू गणना गर्न।

चरणहरू :

➤ अनुसरण गर्नुहोस् चरण-01 को विधि-1

➤ निम्न कोड लेख्नुहोस्

8332

यहाँ, हामीले X लाई Integer , 4 in (पङ्क्तिहरू। गणना, 4) बिक्रीको लागि हो भनेर घोषणा गरेका छौं। कोलमको आधारमा हामीले पङ्क्तिहरू गणना गर्दैछौं र अन्तमा हामीले पङ्क्ति नम्बर X मा तोकेका छौं।

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

एक सन्देश बक्स ( MsgBox ) पङ्क्तिहरूको कुल संख्याको साथ देखा पर्नेछ।

F5 थिच्नुहोस्।

पछि, हामीले सन्देश बक्समा बिक्री स्तम्भको पङ्क्तिहरूको कुल संख्याको रूपमा 8 पाउनेछौं।

सम्बन्धित सामग्री: Excel मा बहु मापदण्डहरू सहित पङ्क्तिहरू कसरी गणना गर्ने (6 विधिहरू)

विधि-4: एक्सेलमा स्तम्भमा डेटासँग पङ्क्तिहरू गणना गर्न VBA चयन गुण प्रयोग गर्दै

तपाईले बिक्रीको डेटामा आधारित कुल पङ्क्तिहरू गणना गर्न चयन गुण पनि प्रयोग गर्न सक्नुहुन्छ। स्तम्भ।

चरणहरू :

➤ पालना गर्नुहोस् चरण-०१ को विधि -1

➤ निम्न कोड लेख्नुहोस्

2562

यहाँ, हामीले X लाई Integer घोषित गरेका छौं, चयन गरिएका पङ्क्तिहरू दायरा यहाँ गणना गरिनेछ, र अन्तमा, हामीले X लाई पङ्क्ति नम्बर तोक्यौं।

एउटा सन्देश बक्स ( MsgBox ) ले हामीलाई कुलको रूपमा परिणाम दिनेछ। पङ्क्तिहरूको संख्या।

त्यसपछि, हामीले मुख्य पानामा फर्कनुपर्छ।

बिक्री स्तम्भको दायरा चयन गर्नुहोस्। , र त्यसपछि, विकासकर्ता ट्याब >> म्याक्रोज विकल्पमा जानुहोस्।

त्यसपछि, म्याक्रो संवाद बाकस पप अप हुनेछ।

म्याक्रो नाम countrows4 चयन गर्नुहोस्, र त्यसपछि, रन थिच्नुहोस्। विकल्प।

अन्तमा, हामीले निम्न सन्देश बक्स प्राप्त गर्नेछौं "प्रयोग गरिएको पङ्क्तिहरूको संख्या 8 हो"

<0

थप पढ्नुहोस्: कसरी एक्सेलमा VBA सँग पङ्क्तिहरू गणना गर्ने (5 दृष्टिकोण)

विधि-5: FIND प्रकार्य प्रयोग गरेर स्तम्भमा डेटाको साथ पङ्क्तिहरू गणना गर्नुहोस्।

यहाँ, हामी प्रयोग गर्नेछौं क्षेत्र स्तम्भमा पाठ स्ट्रिङ भएका पङ्क्तिहरू गणना गर्न FIND function

चरणहरू :

➤ अनुसरण गर्नुहोस् चरण-01 को विधि-1

➤ निम्न कोड लेख्नुहोस्

5249

यहाँ, हामीले घोषणा गरेका छौं। X को रूपमा Integer , rng को रूपमा दायरा , “C4:C11” को आधारमा दायरा हो कुन स्तम्भमा हामी पङ्क्तिहरू गणना गर्दैछौं र अन्तमा हामीले यसलाई नियुक्त गरेका छौं rng

हामीले rng जस्ता वस्तुको नाम दोहोरिन नदिनको लागि WITH कथन प्रयोग गरेका छौं।

FIND प्रकार्य प्रयोग गरेर, X ले हामीलाई यो स्तम्भको कुल प्रयोग गरिएका पङ्क्तिहरू नभई अन्तिम प्रयोग गरिएको पङ्क्ति नम्बर दिनेछ। त्यसैले, कुल पङ्क्ति नम्बर प्राप्त गर्न हामीले X बाट 3 ( सुरुवात पङ्क्ति नम्बर-1 = 4-1 = 3 ) घटाएका छौं।

एक सन्देश बक्स ( MsgBox ) पङ्क्तिहरूको कुल संख्याको साथ देखा पर्नेछ।

F5 थिच्नुहोस्।

अन्तमा, तपाईंसँग सन्देश बक्समा बिक्री स्तम्भको पङ्क्तिहरूको कुल संख्याको रूपमा 8 हुनेछ।

सम्बन्धित सामग्री: एक्सेल काउन्ट भिजिबल पङ्क्तिहरू (सूत्र र VBA कोड)

1>समान पढाइहरू:

  • गणना पङ्क्तिहरू Excel मा पिभोट तालिका भएको समूहमा (चरण-दर-चरण मार्गनिर्देशन)
  • Excel VBA: पानामा पङ्क्तिहरू गणना गर्नुहोस् (५ उदाहरणहरू)

विधि-६: VBA

प्रयोग गरेर स्तम्भमा डाटासँग गैर-रिक्त पङ्क्तिहरू गणना गर्नुहोस्, यहाँ, हामीसँग बिक्री स्तम्भमा केही खाली कक्षहरू छन् (हामीले यस विधिका लागि केही मानहरू हटाएका छौं) र VBA कोड प्रयोग गरेर हामी मानहरू सहित पङ्क्तिहरूको कुल संख्या मात्र गणना गर्नेछौं।

चरणहरू :

➤ फलो गर्नुहोस् चरण-01 को विधि-1

➤ निम्न कोड लेख्नुहोस्

4752

यहाँ, हामीले घोषणा गरेका छौं X को रूपमा Long , Y , र rng रेन्ज , “D4:D11” कुन स्तम्भको आधारमा हामीले पङ्क्तिहरू गनिरहेका छौं र अन्तमा हामीसँग भएको दायरा होयसलाई rng मा तोकिएको छ।

का लागि लुपले COUNTA प्रकार्य प्रयोग गरेर यो दायराको प्रत्येक कक्षमा कुनै मान छ कि छैन भनेर जाँच गर्नेछ। मानहरू भएका कक्षहरूको लागि, X प्रत्येक पटक 1 द्वारा बढाइनेछ।

अन्तमा, हामीले सन्देश मार्फत गैर-खाली कक्षहरू भएका कुल पङ्क्ति संख्याहरू प्राप्त गर्नेछौं। बक्स।

F5 थिच्नुहोस्।

अन्ततः, तपाईंसँग कुल संख्याको रूपमा 5 हुनेछ। सन्देश बाकसमा बिक्री स्तम्भको रिक्त पङ्क्तिहरू।

थप पढ्नुहोस्: VBA (VBA) सँग एक्सेलमा फिल्टर गरिएका पङ्क्तिहरू कसरी गणना गर्ने। चरण-दर-चरण मार्गनिर्देशन)

विधि-7: एक विशेष मान संग पङ्क्तिहरू गणना गर्नुहोस्

यहाँ, हामी को बिक्री मूल्य संग पङ्क्तिहरूको कुल संख्या गणना गर्नेछौं। $2,522.00 बिक्री स्तम्भबाट।

चरणहरू :

➤ पालना गर्नुहोस् चरण -01 को विधि-1

➤ निम्न कोड लेख्नुहोस्

1400

यहाँ, हामीले X लाई को रूपमा घोषणा गरेका छौं। लामो , Y , र rng को रूपमा दायरा , “D4:D11” जसको आधारमा दायरा हो स्तम्भ हामी पङ्क्तिहरू गणना गर्दैछौं र अन्तमा हामीले यसलाई rng मा नियुक्त गरेका छौं।

का लागि लुपले यो दायराको कुनै पनि सेलहरूमा बिक्री मूल्य समावेश छ कि छैन भनेर जाँच गर्नेछ। 1>2522 COUNTIF प्रकार्य प्रयोग गरी र यो मान भएका कक्षहरूको लागि, X प्रत्येक पटक 1 द्वारा वृद्धि हुनेछ।

अन्तमा, हामीले सन्देश मार्फत 2522 को मानको साथ कुल पङ्क्ति नम्बरहरू प्राप्त गर्नेछौं।बक्स।

F5 थिच्नुहोस्।

अन्ततः, तपाईंसँग कुल संख्या पङ्क्तिहरूको रूपमा 3 हुनेछ। सन्देश बाकसमा बिक्री $2,522.00 को बिक्री मूल्य समावेश भएको स्तम्भको।

थप पढ्नुहोस्: एक्सेल VBA: विशिष्ट डाटा (८ उदाहरणहरू) संग पङ्क्तिहरू गणना गर्नुहोस्

विधि-8: एक विशेष मान भन्दा ठूलो मानहरूसँग पङ्क्तिहरू गणना गर्नुहोस्

यस खण्डमा, हामी गर्नेछौं। बिक्री स्तम्भमा $3000.00 भन्दा बढी मानहरू भएका पङ्क्तिहरूको कुल संख्या गणना गर्नुहोस्।

चरणहरू :

➤ अनुसरण गर्नुहोस् चरण-01 को विधि-1

➤ निम्न कोड लेख्नुहोस्

3528

यहाँ, हामीले X लाई Long , Y , र rng Range , <को रूपमा घोषणा गरेका छौं। 1>“D4:D11” को दायरा हो जुन स्तम्भको आधारमा हामीले पङ्क्तिहरू गणना गर्दैछौं र अन्तमा हामीले यसलाई rng मा तोकेका छौं।

का लागि लूपले यो दायराको कुनै पनि सेलमा COUNTIF प्रकार्य प्रयोग गरेर यो दायराको कुनै पनि सेलमा 3000 भन्दा बढी बिक्री मूल्य समावेश छ कि छैन भनेर जाँच गर्नेछ (वा तपाईंले कुनै अन्यको लागि प्रयास गर्न सक्नुहुन्छ। यो भन्दा कम, ठुलो वा बराबर, आदि जस्ता सर्तहरू) र यो मान भएका कक्षहरूका लागि, X प्रत्येक पटक 1 द्वारा बढाइनेछ।

अन्तमा, हामीले सन्देश बक्स मार्फत 3000 भन्दा ठूला मानहरू भएका कुल पङ्क्ति संख्याहरू प्राप्त गर्नेछौं।

F5 थिच्नुहोस्।

पछि, तपाईंसँग 3 बिक्री भएको बिक्री स्तम्भको कुल संख्या पङ्क्तिको रूपमा हुनेछ।म्यासेज बक्समा $3,000.00 भन्दा ठूला मानहरू।

45>

थप पढ्नुहोस्: कसरी एक्सेलले मानसँग पङ्क्तिहरू गणना गर्छ (8) तरिका)

विधि-9: विशिष्ट पाठ स्ट्रिङको साथ पङ्क्तिहरू गणना गर्नुहोस्

हामी यहाँ एपल समावेश पङ्क्तिहरूको संख्या प्राप्त गर्नेछौं। ठ्याक्कै वा आंशिक रूपमा उत्पादन स्तम्भमा।

चरणहरू :

➤ पालना गर्नुहोस् चरण- 01 को विधि-1

➤ निम्न कोड लेख्नुहोस्

5464

यहाँ, हामीले X लाई लामो घोषणा गरेका छौं। , Y , र rng को रूपमा दायरा , “B4:B11” हामीले कुन स्तम्भको आधारमा दायरा हो पङ्क्तिहरू गणना गर्दै छन् र अन्तमा हामीले यसलाई rng मा नियुक्त गरेका छौं।

का लागि लुपले यो दायराको कुनै पनि कक्षमा पाठ स्ट्रिङ समावेश छ कि छैन भनेर जाँच गर्नेछ। "लागू गर्नुहोस्" COUNTIF प्रकार्य प्रयोग गरेर (यहाँ, यसले स्ट्रिङ अघि र पछि एस्टेरिस्क प्रतीक प्रयोग गरेर सटीक मिलान र आंशिक मिलान दुवैको लागि गणना गर्नेछ), र यो मान भएको कक्षहरूको लागि, X प्रत्येक समय 1 द्वारा वृद्धि हुनेछ e.

अन्तमा, हामीले सन्देश बक्स मार्फत पाठ स्ट्रिङ एपल सँग कुल पङ्क्ति नम्बरहरू प्राप्त गर्नेछौं।

➤ थिच्नुहोस् F5

त्यसपछि, तपाईंसँग 2 पाठ स्ट्रिङहरू समावेश भएको उत्पादन स्तम्भको कुल संख्या पङ्क्तिहरूको रूपमा हुनेछ। Apple Pineapple सन्देश बाकसमा।

थप पढ्नुहोस्: एक्सेलमा पाठसँग पङ्क्तिहरू कसरी गणना गर्ने (सबैभन्दा सजिलो८ तरिका)

अभ्यास खण्ड

आफैले अभ्यास गर्नको लागि हामीले अभ्यास नामको पानामा तलको जस्तै अभ्यास खण्ड प्रदान गरेका छौं। । कृपया यो आफै गर्नुहोस्।

निष्कर्ष

यस लेखमा, हामीले एक्सेल <1 को प्रयोग गरेर स्तम्भमा डेटाको साथ पङ्क्तिहरू गणना गर्ने तरिकाहरू कभर गर्ने प्रयास गरेका छौं।>VBA सजिलैसँग। आशा छ तपाईंले यो उपयोगी पाउनुहुनेछ। यदि तपाइँसँग कुनै सुझाव वा प्रश्नहरू छन् भने, टिप्पणी सेक्सनमा साझा गर्न नहिचकिचाउनुहोस्।

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