तुम्ही VBA वापरून पंक्ती हटवण्याचे काही सोपे मार्ग शोधत असाल, तर तुम्ही योग्य ठिकाणी आहात.

चला मुख्य लेखात जाऊया.

वर्कबुक डाउनलोड करा

14 VBA वापरून पंक्ती हटवण्याचे मार्ग

येथे, माझ्याकडे तीन डेटा आहेत VBA वापरून पंक्ती हटवण्याचे मार्ग दाखवण्यासाठी सारण्या. पहिल्या तक्त्यामध्ये कंपनीची काही उत्पादने आणि त्यांचे आकार , किंमती असतात.

दुसरा एकाकडे काही उत्पादन कोड आणि त्यांच्याशी संबंधित उत्पादन आकार आणि किंमत

11>

आणि शेवटच्या कोडमध्ये हे समाविष्ट आहे काही प्रोजेक्टची नावे आणि त्यांच्या संबंधित सुरुवातीच्या तारखा आणि खर्च .

लेख तयार करण्यासाठी, मी Microsoft Excel 365 आवृत्ती वापरली आहे, तुम्ही तुमच्या सोयीनुसार इतर कोणत्याही आवृत्त्या वापरू शकता.

पद्धत-1: VBA वापरून एकच पंक्ती हटवा

चला समजा, तुम्ही उत्पादन शू 1, असलेली पंक्ती हटवायची आहे आणि ही एक पंक्ती हटवण्यासाठी तुम्ही या पद्धतीचा अवलंब करू शकता.

चरण-01 :

➤ डेव्हलपर टॅब>> व्हिज्युअल बेसिक पर्याय

नंतर, Visual Basic Editor उघडेल.

➤ Insert Tab>> मॉड्युल पर्याय

त्यानंतर, एक मॉड्युल तयार होईल.

स्टेप-02 :

➤फोल लिहा लोइंग कोड

3417

येथे, “सिंगल” आहे 11/12/2021 तारखेच्या सेलशी संबंधित एकाधिक श्रेणींचे संघटन, आणि शेवटी, श्रेणी हटवल्या जातील.

➤ दाबा F5

परिणाम :

त्यानंतर, तुम्ही 11/12/2021 या विशिष्ट तारखेच्या पंक्ती हटवाल. .

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

सराव विभाग

स्वत: सराव करण्यासाठी आम्ही सराव नावाच्या शीटमध्ये खालीलप्रमाणे सराव विभाग प्रदान केला आहे. कृपया ते स्वतः करा.

निष्कर्ष

या लेखात, मी VBA प्रभावीपणे वापरण्याचे सर्वात सोपे मार्ग समाविष्ट करण्याचा प्रयत्न केला. पंक्ती हटवत आहे. तुम्हाला ते उपयुक्त वाटेल अशी आशा आहे. तुमच्याकडे काही सूचना किंवा प्रश्न असल्यास, त्या टिप्पणी विभागात मोकळ्या मनाने शेअर करा.

.EntireRow.Delete संपूर्ण पंक्ती 7 हटवेल.

➤ दाबा F5

परिणाम :

अशा प्रकारे, तुम्ही <1 असलेली पंक्ती हटवाल>उत्पादन नाव शू 1 .

अधिक वाचा: एक्सेलमधील पंक्ती कशा हटवायच्या: 7 पद्धती

पद्धत-2: VBA वापरून अनेक पंक्ती हटवा

जर तुम्हाला उत्पादन नावे शू१<असलेल्या पंक्तींसारख्या अनेक पंक्ती हटवायच्या असतील तर 9>, Shoe2, आणि Shoe3 , नंतर तुम्ही हा VBA कोड फॉलो करू शकता.

चरण-01 :

➤ अनुसरण करा चरण-01 चे पद्धत-1

5914

येथे, पंक्ती क्रमांक 13, 10 , आणि 7 हटवले जातील आणि अनुक्रमे लिहून पंक्ती क्रमांक तुम्हाला शेवटच्या पंक्ती क्रमांकापासून पहिल्या पंक्ती क्रमांकावर या कोडप्रमाणे लिहावे लागतील.

अन्यथा, पहिली पंक्ती हटवल्यानंतर पंक्ती 7 सारखी उर्वरित या पंक्तीच्या खालील पंक्ती एक पंक्ती वर जातील आणि अशा प्रकारे पंक्ती 10 ही पंक्ती 9 असेल आणि 13 ची पंक्ती 12वी असेल. यासाठी पुन्हा असेन, तुम्ही योग्य पंक्ती हटवू शकणार नाही.

➤ दाबा F5

परिणाम :

मग, तुम्ही उत्पादन नावे शू 1 , शू2, आणि शू3 असलेली पंक्ती हटवाल.

अधिक वाचा: एक्सेलमधील अनेक पंक्ती कशा हटवायच्या (3 पद्धती)

पद्धत-3 :

निवडून पंक्ती हटवणे येथे, मी पंक्ती हटवण्याचा मार्ग दाखवीनत्या पंक्तीच्या सक्रिय सेलच्या संदर्भात.

स्टेप-०१ :

➤फॉलो स्टेप-०१ चे पद्धत-1

5277

ते सक्रिय सेल असलेली पंक्ती हटवेल.

➤कोड जतन करा.

स्टेप-02 :

➤ तुम्हाला हटवायचा असलेल्या पंक्तीचा कोणताही सेल निवडा ( येथे मी सेल B7 )

➤ डेव्हलपर टॅब>> मॅक्रो पर्याय

26>

त्यानंतर, मॅक्रो <2 वर जा>विझार्ड उघडेल.

➤ मॅक्रो नाव dltrow3 निवडा आणि चालवा

<3 दाबा

परिणाम :

नंतर, तुम्ही उत्पादन नाव शू 1 असलेली पंक्ती हटवाल.

पद्धत-4: निवडीतील सर्व पंक्ती हटवणे

निवडीच्या सर्व पंक्ती हटवण्यासाठी तुम्ही या पद्धतीचा अवलंब करू शकता.

चरण-01 :

➤ अनुसरण करा पद्धत-1

2820

चे चरण-01 चे अनुसरण करा निवडीच्या सर्व पंक्ती हटवेल.

➤कोड जतन करा.

चरण-02 :

➤तुम्ही हटवू इच्छित असलेल्या पंक्तींची श्रेणी निवडा (येथे, मी श्रेणी निवडली आहे B7:D9 )

➤ डेव्हलपर टॅब>> मॅक्रो पर्याय

त्यानंतर, मॅक्रो विझार्ड उघडेल.

➤ मॅक्रो नाव dltrow4 निवडा आणि चालवा

परिणाम :

नंतर, तुम्ही असलेल्या पंक्ती हटवाल. उत्पादन नावे शू 1 , जॅकेट1, आणि जॅकेट2 .

अधिक वाचा: एक्सेलमधील निवडलेल्या पंक्ती कशा हटवायच्या(8 दृष्टीकोन)

पद्धत-5: कोणताही सेल रिकामा असल्यास पंक्ती हटवणे

येथे, माझ्याकडे एक रिकामा सेल आहे जो B9 आहे (यासाठी मी या सेलमधून मूल्य काढून टाकले आहे. पद्धत), आणि VBA कोड वापरून मी B9 सेल असलेली पंक्ती हटवीन.

चरण-01 :

➤ अनुसरण करा पद्धत-1

7458

चे चरण-01 ते <1 श्रेणीतील सर्व पंक्ती हटवेल>“B5:D13” कोणताही रिक्त सेल असणे.

➤ F5

परिणाम<2 दाबा>:

तर, तुम्ही रिक्त सेल असलेली पंक्ती हटविण्यास सक्षम असाल.

अधिक वाचा: एक्सेलमधील रिकाम्या पंक्ती कशा काढायच्या (11 पद्धती)

पद्धत-6: ​​संपूर्ण पंक्ती रिकामी असल्यास एक पंक्ती हटवणे

येथे, माझ्याकडे एक रिक्त सेल आहे जो <1 आहे>B9 (मी या पद्धतीची मूल्ये काढून टाकली आहेत), आणि रिकामी पंक्ती जी 12 आहे (मी या पद्धतीची मूल्ये काढून टाकली आहेत), आणि VBA कोड आणि <1 वापरून>COUNTA कार्य मी रिकामी असलेली पंक्ती हटवीन.

चरण-01 :

➤ अनुसरण करा चरण-01 चे पद्धत-1

1133

“B5:D13” डेटा श्रेणी आहे आणि for लूप मधील प्रत्येक सेलसाठी कार्य करेल ही श्रेणी.

CountA(cell.EntireRow) नॉन-रिक्त सेलची संख्या परत करेल आणि जेव्हा ती 0 होईल तेव्हा पंक्ती हटवली जाईल.

<38

➤ दाबा F5

परिणाम :

त्यानंतर, तुम्ही रिकामी पंक्ती हटवू शकाल परंतु ती सर्व नसलेली कोणतीही पंक्ती हटवू शकणार नाही. या पंक्तीचे सेल रिकामे.

अधिक वाचा: एक्सेलमधील रिकाम्या पंक्ती हटवण्यासाठी VBA कसे वापरावे

पद्धत-7: प्रत्येक nवी पंक्ती हटवणे

या पद्धतीचा अवलंब करून तुम्ही प्रत्येक nवी पंक्ती (या प्रकरणात प्रत्येक 3री पंक्ती) हटवू शकता.

➤ अनुसरण करा पद्धत-1

8268

“B5 पैकी चरण-01 :D13” ही डेटा श्रेणी आहे आणि rc या श्रेणीची एकूण पंक्ती संख्या परत करेल जी 9 आहे.

येथे, साठी लूप शेवटच्या पंक्तीपासून सुरू होईल जी या प्रकरणात rc किंवा 9 आहे आणि पहिल्या पंक्तीने समाप्त होईल.

चरण -3 या श्रेणीतील प्रत्येक 3री पंक्ती हटविण्यात मदत करेल.

➤ F5

<दाबा 1>परिणाम :

मग, तुम्ही उत्पादन नावे शू 1 , शू2, आणि <8 असलेल्या पंक्ती हटवाल>Shoe3 .

अधिक वाचा: प्रत्येक नववा R कसा हटवायचा ow Excel मध्ये (सर्वात सोपे 6 मार्ग)

समान वाचन:

• एक्सेल VBA सह निवडलेल्या पंक्ती कशा हटवायच्या (एक पायरी- बाय-स्टेप गाइडलाइन)
• एक्सेलमधील न वापरलेल्या पंक्ती हटवा (8 सोपे मार्ग)
• एक्सेलमधील लपलेल्या पंक्ती कशा हटवायच्या (3 पद्धती)
• एक्सेलमधील अनंत पंक्ती हटवा (5 सोपे मार्ग)
• एक्सेलमधील पंक्ती कशा हटवायच्या ज्या कायम चालू राहतील (4 सोपे मार्ग)मार्ग)

पद्धत-8: सेल मूल्यावर आधारित पंक्ती हटवणे

या पद्धतीत, मी विशिष्ट मूल्य असलेली पंक्ती हटवीन शर्ट 2 .

चरण-01 :

➤ अनुसरण करा चरण-01 चे पद्धत- 1

7380

“B5:D13” हे डेटा श्रेणी आहे आणि FOR लूप या श्रेणीतील प्रत्येक सेलसाठी कार्य करेल.

जर पंक्तीच्या कोणत्याही सेलमध्ये “शर्ट 2” हे मूल्य असेल तर ती पंक्ती हटवली जाईल.

➤ F5<2 दाबा

परिणाम :

अशा प्रकारे, तुम्ही उत्पादन नाव शर्ट 2 असलेली पंक्ती हटवाल.

अधिक वाचा: सेलमध्ये एक्सेलमध्ये मूल्य असल्यास पंक्ती हटवण्यासाठी VBA मॅक्रो (2 पद्धती)

पद्धत-9: डुप्लिकेट पंक्ती हटवणे

येथे, माझ्याकडे उत्पादन कोड 97375 असलेल्या दोन पंक्ती आहेत आणि म्हणून मला यापैकी एक पंक्ती हटवायची आहे जी चिन्हांकित आहेत खाली लाल बॉक्स.

स्टेप-01 :

➤फॉलो स्टेप-01 चे पद्धत-1

4849

येथे “B5:D13” डेटा श्रेणी आहे आणि स्तंभ:=1 मी उत्तर हे डुप्लिकेट व्हॅल्यूज फक्त एका कॉलममध्‍ये शोधेल जे सुरुवातीचा स्‍तंभ आहे कॉलम बी परंतु जर तुम्‍हाला इतर कॉलममध्‍ये देखील शोधायचे असेल तर तुम्ही तुमच्‍या गरजेनुसार हा नंबर वापरू शकता.

➤ दाबा F5

परिणाम :

नंतर, तुम्ही ती पंक्ती हटवू शकाल जी दुसर्‍या पंक्तीप्रमाणेच.

अधिक वाचा: मधील डुप्लिकेट पंक्ती कशा हटवायच्याVBA सह एक्सेल (8 प्रभावी मार्ग)

पद्धत-10: टेबलमधील पंक्ती हटवणे

समजा, तुमच्याकडे खालील सारणी आहे ज्याचे नाव टेबल1 आणि आता तुम्हाला या टेबलची पंक्ती क्रमांक 6 हटवायची आहे. हे करण्यासाठी तुम्ही या पद्धतीचा अवलंब करू शकता.

स्टेप-01 :

➤फॉलो स्टेप-01 चा पद्धत-1

9511

येथे “टेबल” शीटचे नाव आहे, “टेबल1” हे टेबलचे नाव आहे आणि 6 या सारणीचा पंक्ती क्रमांक आहे जो तुम्हाला हटवायचा आहे.

➤ F5

<1 दाबा>परिणाम :

अशा प्रकारे, तुम्ही या सारणीची तुमची इच्छित पंक्ती हटवाल.

अधिक वाचा: एक्सेल VBA वापरून एका स्तंभावर आधारित डुप्लिकेट पंक्ती कशा काढायच्या

पद्धत-11: फिल्टर केल्यानंतर दृश्यमान पंक्ती हटवणे

येथे, माझ्याकडे एक डेटा सारणी आहे जी फिल्टर केली आहे किंमत स्तंभ $1,500.00 पेक्षा जास्त मूल्यांसाठी आणि मी फिल्टर केल्यानंतर सर्व दृश्यमान पंक्ती हटवू इच्छितो.

चरण-01 :

➤ अनुसरण करा चरण-01 चे पद्धत-1

8294

येथे, “B5: D13” ही डेटा श्रेणी आहे.

➤ F5

आता दाबा, फिल्टर केल्यानंतर सर्व दृश्यमान पंक्ती हटवले जावे. तुम्ही आता किंमत स्तंभात फिल्टर चिन्ह निवडून लपलेल्या पंक्ती परत आणू शकता.

➤<वर क्लिक करा 1>सर्व निवडा पर्याय

➤ दाबा ठीक आहे

परिणाम :

शेवटी, तुम्हाला लपलेल्या पंक्ती परत मिळतीलडेटा टेबल.

अधिक वाचा: एक्सेलमध्ये VBA सह पंक्ती फिल्टर आणि हटवण्याच्या (2 पद्धती) <3

पद्धत-12: शेवटच्या सक्रिय सेलवर आधारित पंक्ती हटवणे

येथे, माझा शेवटचा सक्रिय सेल सेल आहे B13 आणि मला खालीलपैकी शेवटचा सक्रिय सेल असलेला हा हटवायचा आहे. डेटा सारणी.

चरण-01 :

➤ अनुसरण करा चरण-01 चे पद्धती -1

3733

येथे, 2 म्हणजे स्तंभ B ज्यावर माझा सक्रिय सेल आहे, तुम्ही तुमच्या गरजेनुसार नंबर बदलू शकता.<3

➤ दाबा F5

परिणाम :

अशा प्रकारे, तुम्ही तुमचे डिलीट कराल शेवटची सक्रिय पंक्ती.

अधिक वाचा: एकाधिक सेल मूल्यावर आधारित पंक्ती हटवण्यासाठी एक्सेल VBA कोड (3 निकष)

पद्धत-13: कोणत्याही स्ट्रिंग असलेल्या पंक्ती हटवणे

समजा, तुम्हाला कोणत्याही स्ट्रिंग असलेल्या पंक्ती हटवायच्या आहेत आणि हे करण्यासाठी तुम्ही या पद्धतीचा अवलंब करू शकता.

<64

चरण-01 :

➤ अनुसरण करा पद्धत-1

सह विधान तुम्हाला ऑब्जेक्ट निर्दिष्ट करू देते किंवा विधानांच्या संपूर्ण मालिकेसाठी एकदा वापरकर्ता-परिभाषित प्रकार.

एरर रीझ्युम नेक्स्ट स्टेटमेंट निर्दिष्ट करते की, जेव्हा रन-टाइम एरर येते, तेव्हा नियंत्रण स्टेटमेंटच्या पुढील स्टेटमेंटकडे जाते जेथे त्रुटी येते.

अंतिम रो आणि LastColumn डेटा श्रेणीची शेवटची पंक्ती आणि स्तंभ परत करा.

SpecialCells(xlCellTypeConstants, xlTextValues) मध्‍ये कोणतीही मजकूर मूल्ये असलेली पंक्ती निवडेल श्रेणी.

➤ दाबा F5

परिणाम :

नंतर, तुम्हाला मिळेल कोणत्याही मजकूर स्ट्रिंग असलेल्या पंक्ती हटवा.

अधिक वाचा: पंक्ती हटवण्यासाठी एक्सेल शॉर्टकट (बोनस तंत्रांसह) <3

पद्धत-14: तारखांवर आधारित पंक्ती हटवणे

येथे, मी यामधील 11/12/2021 (mm/dd/yyyy) विशेष तारखे असलेल्या पंक्ती हटवीन DATEVALUE कार्य वापरून पद्धत.

चरण-01 :

➤ अनुसरण करा चरण- 01 चा पद्धत-1

9781

येथे, “तारीख” हे शीटचे नाव आहे, या डेटा श्रेणीची पहिली-पंक्ती क्रमांक आहे 5 आणि निकष स्तंभ (कोणत्या स्तंभात तारखा आहेत) क्रमांक आहे 3 .

सह विधान तुम्हाला एकदा ऑब्जेक्ट किंवा वापरकर्ता-परिभाषित प्रकार निर्दिष्ट करू देते विधानांच्या संपूर्ण मालिकेसाठी.

ऑन एरर रीझ्युम नेक्स्ट विधान हे निर्दिष्ट करते की, जेव्हा रन-टाइम एरर येते, तेव्हा एरर येते त्या स्टेटमेंटनंतर कंट्रोल स्टेटमेंटवर जाते.

LastRow डेटा रेंजची शेवटची पंक्ती देते आणि येथे, FOR लूप शेवटच्या पंक्तीपासून सुरू होईल जी या प्रकरणात अंतिमपंक्ती किंवा 6 आहे आणि पहिल्या पंक्तीने समाप्त होईल.

DATEVALUE मजकूर तारखेला मूल्यात रूपांतरित करेल.

येथे, युनियन