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

मुख्य लेखमा डुबौं।

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

14 VBA प्रयोग गरेर पङ्क्ति मेटाउने तरिका

यहाँ, मसँग तीनवटा डाटा छन् VBA प्रयोग गरेर पङ्क्तिहरू मेटाउने तरिकाहरू देखाउन तालिकाहरू। पहिलो तालिकामा कम्पनीका केही उत्पादनहरू र तिनीहरूको साइज , मूल्य ।

10>

दोस्रो एउटासँग केही उत्पादन कोडहरू र तिनीहरूसँग सम्बन्धित उत्पादन आकारहरू र मूल्यहरू

र अन्तिममा समावेश छन्। केही परियोजना नामहरू र तिनीहरूको सम्बन्धित सुरु मिति र लागत ।

12>

लेख सिर्जना गर्नको लागि, म Microsoft Excel 365 संस्करण प्रयोग गरेको छ, तपाइँ आफ्नो सुविधा अनुसार कुनै पनि अन्य संस्करणहरू प्रयोग गर्न सक्नुहुन्छ।

विधि-1: VBA प्रयोग गरेर एकल पङ्क्ति मेटाउनुहोस्

मानौं, तपाइँ उत्पादन जुत्ता 1, भएको पङ्क्ति मेटाउन चाहनुहुन्छ र यो एकल पङ्क्ति मेटाउन तपाईं यो विधि अपनाउन सक्नुहुन्छ।

चरण-01 :

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

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

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

त्यसपछि, मोड्युल बनाइनेछ।

18>

चरण-०२ :

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

5649

यहाँ, "एकल" हो 11/12/2021 मिति भएको कक्षहरूसँग सम्बन्धित बहु दायराहरूको मिलन, र अन्तमा, दायराहरू मेटिने छन्।

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

परिणाम :

त्यसपछि, तपाईंले 11/12/2021 को निश्चित मिति भएका पङ्क्तिहरू मेटाउनुहुनेछ। .

सम्बन्धित सामग्री: विशेष डाटा (९ उदाहरणहरू) संग पङ्क्तिहरू मेटाउन एक्सेल VBA

अभ्यास खण्ड

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

निष्कर्ष

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

।EntireRow.Delete ले सम्पूर्ण पङ्क्ति 7 मेट्नेछ।

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

परिणाम :

यस प्रकारले, तपाईंले <1 समावेश भएको पङ्क्ति मेटाउनुहुनेछ।>उत्पादन नाम जुत्ता 1 ।

थप पढ्नुहोस्: एक्सेलमा पङ्क्तिहरू कसरी मेटाउने: 7 विधिहरू

विधि-2: VBA प्रयोग गरेर धेरै पङ्क्तिहरू मेटाउनुहोस्

यदि तपाईं उत्पादन नामहरू Shoe1<भएको पङ्क्तिहरू जस्तै धेरै पङ्क्तिहरू मेटाउन चाहनुहुन्छ भने 9>, Shoe2, र Shoe3 , त्यसपछि तपाइँ यो VBA कोड पालना गर्न सक्नुहुन्छ।

चरण-01 :

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

यहाँ, पङ्क्ति नम्बर १३, १० , र 7 मेटिनेछ र क्रमबद्ध रूपमा पङ्क्ति नम्बरहरू लेखेर तपाईंले अन्तिम पङ्क्ति नम्बरबाट पहिलो-पङ्क्ति नम्बरमा यो कोड जस्तै लेख्नुपर्छ।

अन्यथा, पङ्क्ति 7 जस्तै पहिलो पङ्क्ति मेटाएपछि बाँकी यस पङ्क्तिको तलका पङ्क्तिहरूले एउटा पङ्क्तिलाई माथि सार्नेछ र यसरी पङ्क्ति 10 पङ्क्ति 9 हुनेछ, र पङ्क्ति 13 पङ्क्ति 12 हुनेछ। यसका लागि पुन: ason, तपाईले सही पङ्क्तिहरू मेटाउन सक्षम हुनुहुने छैन।

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

नतिजा :

त्यसपछि, तपाईंले उत्पादन नामहरू Shoe 1 , Shoe2, र Shoe3 समावेश भएका पङ्क्तिहरू मेटाउनुहुनेछ।

23>

थप पढ्नुहोस्: एक्सेलमा धेरै पङ्क्तिहरू कसरी मेटाउने (३ विधिहरू)

विधि-3 : चयन गरेर पङ्क्ति मेटाउँदै

यहाँ, म पङ्क्ति मेटाउने तरिका देखाउनेछु।त्यो पङ्क्तिको सक्रिय कक्षको सन्दर्भमा।

चरण-०१ :

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

1627

यसले सक्रिय सेल भएको पङ्क्ति मेटाउनेछ।

25>

➤कोड सुरक्षित गर्नुहोस्।

चरण-02 :

➤ तपाईंले मेटाउन चाहनुभएको पङ्क्तिको कुनै पनि सेल चयन गर्नुहोस् (यहाँ मैले सेल चयन गरेको छु B7 )

➤ जानुहोस् विकासकर्ता ट्याब>> म्याक्रोज विकल्प

त्यसपछि, म्याक्रो विजार्ड खुल्नेछ।

➤ म्याक्रो नाम dltrow3 चयन गर्नुहोस् र Run

<3 थिच्नुहोस्।>

नतिजा :

त्यसपछि, तपाईंले उत्पादन नाम जुत्ता 1 समावेश भएको पङ्क्ति मेटाउनुहुनेछ।

विधि-4: चयनमा सबै पङ्क्तिहरू मेटाउने

एक चयनका सबै पङ्क्तिहरू मेटाउनको लागि तपाईंले यो विधि अपनाउन सक्नुहुन्छ।

चरण-01 :

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

2597

यो चयनका सबै पङ्क्तिहरू मेटाउनेछ।

➤ कोड बचत गर्नुहोस्।

चरण-02 :

➤ तपाईंले मेटाउन चाहनुभएको पङ्क्तिहरूको दायरा चयन गर्नुहोस् (यहाँ, मैले दायरा चयन गरेको छु B7:D9 )

➤ जानुहोस् विकासकर्ता ट्याब>> म्याक्रोज विकल्प

त्यसपछि, म्याक्रो विजार्ड खुल्नेछ।

➤ म्याक्रो नाम dltrow4 चयन गर्नुहोस्। र थिच्नुहोस् रन

परिणाम :

त्यसपछि, तपाईंले समावेश पङ्क्तिहरू मेटाउनुहुनेछ। उत्पादन नामहरू जुत्ता 1 , ज्याकेट1, र ज्याकेट2 ।

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

विधि-5: कुनै सेल खाली भएमा पङ्क्ति मेटाउने

यहाँ, मसँग एउटा खाली सेल छ जुन B9 (यसको लागि मैले यो सेलबाट मान हटाएको छु। विधि), र VBA कोड प्रयोग गरेर म B9 सेल भएको पङ्क्ति मेटाउनेछु।

चरण-०१ :

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

1684

यसले दायरा <1 मा सबै पङ्क्तिहरू मेटाउनेछ।>“B5:D13” कुनै पनि खाली सेल भएको।

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

परिणाम :

त्यसपछि, तपाईंले खाली कक्ष भएको पङ्क्ति मेटाउन सक्षम हुनुहुनेछ।

थप पढ्नुहोस्: एक्सेलमा खाली पङ्क्तिहरू कसरी हटाउने (11 विधि)

विधि-6: यदि सम्पूर्ण पङ्क्ति खाली छ भने पङ्क्ति मेटाउने

यहाँ, मसँग एउटा खाली सेल छ जुन <1 हो।>B9 (मैले यो विधिको लागि मानहरू हटाएको छु), र एउटा खाली पङ्क्ति जुन पङ्क्ति 12 हो (मैले यो विधिको लागि मानहरू हटाएको छु), र VBA कोड र <1 प्रयोग गरेर।>COUNTA प्रकार्य म खाली भएको पङ्क्ति मेटाउनेछु।

चरण-०१ :

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

2643

“B5:D13” डेटा दायरा हो र का लागि लूपले प्रत्येक सेलमा काम गर्नेछ। यो दायरा।

CountA(cell.EntireRow) ले गैर-खाली कक्षहरूको संख्या फर्काउनेछ र जब यो ० हुन्छ तब पङ्क्ति मेटिनेछ।

<38

➤ थिच्नुहोस्1 यस पङ्क्तिका कक्षहरू खाली छन्।

थप पढ्नुहोस्: एक्सेलमा खाली पङ्क्तिहरू मेटाउन VBA कसरी प्रयोग गर्ने

विधि-7: प्रत्येक n औं पङ्क्ति मेटाउने

तपाईले यो विधि अपनाएर प्रत्येक n औं पङ्क्ति (यस अवस्थामा प्रत्येक तेस्रो पङ्क्ति) मेटाउन सक्नुहुन्छ।

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

“B5 :D13” डेटा दायरा हो र rc ले यो दायराको कुल पङ्क्ति नम्बर फर्काउनेछ जुन 9 हो।

यहाँ, का लागि लुप अन्तिम पङ्क्तिबाट सुरु हुनेछ जुन यस अवस्थामा rc वा 9 हो र पहिलो पङ्क्तिमा समाप्त हुन्छ।

चरण -3 यस दायरामा प्रत्येक 3rd पङ्क्ति मेटाउन मद्दत गर्नेछ।

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

नतिजा :

त्यसपछि, तपाईंले उत्पादन नामहरू जुत्ता 1 , Shoe2, र <8 समावेश भएका पङ्क्तिहरू मेटाउनुहुनेछ।>Shoe3 ।

थप पढ्नुहोस्: प्रत्येक नवौं आर कसरी मेट्ने एक्सेलमा ow (सबैभन्दा सजिलो ६ तरिकाहरू)

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

• एक्सेल VBA मार्फत चयन गरिएका पङ्क्तिहरू कसरी मेटाउने (एक चरण- बाइ-स्टेप गाइडलाइन)
• एक्सेलमा प्रयोग नगरिएका पङ्क्तिहरू मेटाउनुहोस् (८ सजिलो तरिका)
• एक्सेलमा लुकेका पङ्क्तिहरू कसरी मेटाउने (३ विधिहरू)
• Excel मा अनन्त पङ्क्तिहरू मेटाउनुहोस् (5 सजिलो तरिकाहरू)
• कसरी एक्सेलमा पङ्क्तिहरू मेटाउने जुन सधैंभरि जान्छ (4 सजिलोतरिका)

विधि-8: सेल मानको आधारमा पङ्क्ति मेटाउने

यस विधिमा, म निश्चित मान भएको पङ्क्ति मेटाउनेछु शर्ट २ ।

चरण-०१ :

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

3381

“B5:D13” डेटा दायरा हो र का लागि लूपले यस दायरामा प्रत्येक सेलको लागि काम गर्नेछ।

यदि पङ्क्तिको कुनै पनि सेलमा “शर्ट २” मान छ भने पङ्क्ति मेटिनेछ।

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

नतिजा :

यस तरिकाले, तपाईंले उत्पादन नाम सर्ट 2 समावेश भएको पङ्क्ति मेटाउनुहुनेछ।

थप पढ्नुहोस्: पङ्क्ति मेटाउन VBA म्याक्रो यदि सेलमा एक्सेलमा मान समावेश छ (२ विधिहरू)

विधि-९: डुप्लिकेट पङ्क्तिहरू मेटाउने

यहाँ, मसँग उत्पादन कोड 97375 भएको दुई पङ्क्तिहरू छन् र त्यसैले म यी पङ्क्तिहरू मध्ये एउटा मेटाउन चाहन्छु जुन द्वारा चिन्ह लगाइएको छ। तलको रातो बक्स।

चरण-०१ :

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

5439

यहाँ, “B5:D13” डेटा दायरा र स्तम्भहरू:=1 म उत्तर यसले एउटा स्तम्भमा मात्र नक्कल मानहरू खोज्नेछ जुन सुरु हुने स्तम्भ हो स्तम्भ B तर यदि तपाईं अन्य स्तम्भहरूमा पनि खोज्न चाहनुहुन्छ भने तपाईंले आफ्नो आवश्यकता अनुसार यो नम्बर प्रयोग गर्न सक्नुहुन्छ।

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

परिणाम :

पछि, तपाइँ पङ्क्ति मेटाउन सक्षम हुनुहुनेछ जुन अर्को पङ्क्तिसँग मिल्दोजुल्दो।

थप पढ्नुहोस्: कसरी डुप्लिकेट पङ्क्तिहरू मेटाउनेVBA (8 प्रभावकारी तरिकाहरू) संग एक्सेल

विधि-10: तालिकामा पङ्क्तिहरू मेटाउने

मान्नुहोस्, तपाइँसँग निम्न तालिका छ जसको नाम टेबल1 र अब तपाईं यस तालिकाको पङ्क्ति नम्बर 6 मेटाउन चाहनुहुन्छ। यसका लागि तपाईले यो विधि अपनाउन सक्नुहुन्छ।

Step-01 :

➤Follow Step-01 को विधि-1

8621

यहाँ, “तालिका” पानाको नाम हो, “तालिका1” तालिकाको नाम हो र 6 यो तालिकाको पङ्क्ति नम्बर हो जुन तपाईंले मेटाउन चाहनुहुन्छ।

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

परिणाम :

यस तरिकाले, तपाईंले यो तालिकाको आफ्नो मनपर्ने पङ्क्ति मेटाउनुहुनेछ।

थप पढ्नुहोस्: एक्सेल VBA प्रयोग गरेर एउटा स्तम्भमा आधारित डुप्लिकेट पङ्क्तिहरू कसरी हटाउने

विधि-11: फिल्टर गरेपछि दृश्यात्मक पङ्क्तिहरू मेटाउने

यहाँ, मसँग डेटा तालिका छ जुन फिल्टर गरिएको छ। मूल्य $1,500.00 भन्दा बढी मानहरूको लागि स्तम्भ र म फिल्टर गरेपछि सबै देखिने पङ्क्तिहरू मेटाउन चाहन्छु।

चरण-०१ :

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

यहाँ, “B5: D13” डेटा दायरा हो।

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

अब, फिल्टर गरेपछि देखिने सबै पङ्क्तिहरू मेटाइन्छ। तपाईंले अब मूल्य स्तम्भमा फिल्टर साइन इन चयन गरेर लुकेका पङ्क्तिहरू फिर्ता ल्याउन सक्नुहुन्छ।

➤मा क्लिक गर्नुहोस्। 1>सबै चयन गर्नुहोस् विकल्प

➤ थिच्नुहोस् ठीक

नतिजा :

अन्तमा, तपाईंले लुकेका पङ्क्तिहरू फिर्ता पाउनुहुनेछडेटा तालिका।

थप पढ्नुहोस्: एक्सेलमा VBA मार्फत पङ्क्तिहरू कसरी फिल्टर गर्ने र मेटाउने (२ विधिहरू) <3

विधि-12: अन्तिम सक्रिय सेलको आधारमा पङ्क्ति मेटाउने

यहाँ, मेरो अन्तिम सक्रिय सेल सेल हो B13 र म निम्नको अन्तिम सक्रिय सेल भएको यसलाई मेटाउन चाहन्छु। डेटा तालिका।

चरण-०१ :

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

7102

यहाँ, 2 को अर्थ स्तम्भ B जसमा मेरो सक्रिय सेल छ, तपाईले आफ्नो आवश्यकता अनुसार नम्बर परिवर्तन गर्न सक्नुहुन्छ।<3

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

परिणाम :

यस तरिकाले, तपाईंले आफ्नो मेटाउनुहुनेछ पछिल्लो सक्रिय पङ्क्ति।

थप पढ्नुहोस्: बहु सेल मान (३ मापदण्ड) मा आधारित पङ्क्तिहरू मेटाउन एक्सेल VBA कोड

विधि-13: कुनै पनि स्ट्रिङ भएका पङ्क्तिहरू मेटाउने

मान्नुहोस्, तपाईं कुनै पनि स्ट्रिङ भएका पङ्क्तिहरू मेटाउन चाहनुहुन्छ, र यसका लागि तपाईंले यो विधि अपनाउन सक्नुहुन्छ।

चरण-०१ :

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

यहाँ, “स्ट्रिङ” पानाको नाम हो, यस डेटा दायराको पहिलो-पङ्क्ति नम्बर हो 5 र सुरु स्तम्भ नम्बर हो 2

साथ कथनले तपाईंलाई वस्तु निर्दिष्ट गर्न दिन्छ। वा कथनहरूको सम्पूर्ण शृङ्खलाका लागि एक पटक प्रयोगकर्ता-परिभाषित प्रकार।

अन एरर रिजुम नेक्स्ट कथनले निर्दिष्ट गर्दछ कि, जब रन-टाइम त्रुटि देखापर्छ, नियन्त्रण कथन पछि स्टेटमेन्टमा जान्छ जहाँ त्रुटि हुन्छ।

LastRow र LastColumn डेटा दायराको अन्तिम पङ्क्ति र स्तम्भ फर्काउनुहोस्।

SpecialCells(xlCellTypeConstants, xlTextValues) ले कुनै पनि पाठ मान भएका पङ्क्तिहरू चयन गर्नेछ। दायरा।

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

परिणाम :

पछि, तपाईंले कुनै पनि पाठ स्ट्रिङ भएको पङ्क्तिहरू मेटाउनुहोस्।

थप पढ्नुहोस्: पङ्क्तिहरू मेटाउन एक्सेल सर्टकट (बोनस प्रविधिहरूसँग) <3

विधि-14: मितिहरूमा आधारित पङ्क्ति मेटाउने

यहाँ, म विशेष मिति 11/12/2021 (mm/dd/yyyy) भएका पङ्क्तिहरू मेटाउनेछु। DATEVALUE प्रकार्य प्रयोग गरेर।

67>

चरण-०१ :

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

8640

यहाँ, “मिति” पानाको नाम हो, यो डाटा दायराको पहिलो पङ्क्ति नम्बर हो 5 र मापदण्ड स्तम्भ (जुन स्तम्भमा मितिहरू छन्) नम्बर हो 3 ।

साथ कथनले तपाईंलाई वस्तु वा प्रयोगकर्ता-परिभाषित प्रकार एक पटक निर्दिष्ट गर्न दिन्छ। कथनहरूको सम्पूर्ण श्रृंखलाको लागि।

अन एरर रिजुम नेक्स्ट कथनले निर्दिष्ट गर्दछ कि, जब रन-टाइम त्रुटि हुन्छ, नियन्त्रण कथनमा जान्छ जहाँ त्रुटि देखा पर्दछ।

LastRow डेटा दायराको अन्तिम पङ्क्ति फर्काउँछ र यहाँ, का लागि लुप अन्तिम पङ्क्तिबाट सुरु हुनेछ जुन यस अवस्थामा LastRow वा 6 हो, र पहिलो पङ्क्तिमा समाप्त हुन्छ।

DATEVALUE ले पाठ मितिलाई मानमा रूपान्तरण गर्नेछ।

यहाँ, संघ ले फर्काउनेछ।