VBA استعمال ڪندي قطار کي ڪيئن ختم ڪجي (14 طريقا)

  • هن کي شيئر ڪريو
Hugh West

جيڪڏهن توهان VBA استعمال ڪندي قطار کي ختم ڪرڻ جا ڪجهه آسان طريقا ڳولي رهيا آهيو، ته پوءِ توهان صحيح جاءِ تي آهيو.

اچو ته مکيه مضمون ۾ وڃو.

ورڪ بڪ ڊائون لوڊ ڪريو

VBA Delete Row.xlsm

VBA استعمال ڪندي قطار کي ختم ڪرڻ جا 14 طريقا

هتي، مون وٽ ٽي ڊيٽا آهن VBA استعمال ڪندي قطار کي حذف ڪرڻ جا طريقا ڏيکارڻ لاءِ ٽيبل. پهرين جدول تي مشتمل آهي ڪجهه پراڊڪٽس ڪمپني جا ۽ انهن جي سائز ، قيمتن .

10>

ٻيو ھڪڙي وٽ ڪجھ آھن پراڊڪٽ ڪوڊس ۽ انھن سان لاڳاپيل پراڊڪٽ جي سائز ۽ قيمتون

0>11>

۽ آخري ھڪڙي تي مشتمل آھي ڪجھ پروجيڪٽ جا نالا ۽ انھن سان لاڳاپيل شروع جون تاريخون ۽ لاگت .

12>

آرٽيڪل ٺاهڻ لاءِ، آئون استعمال ڪيو آهي Microsoft Excel 365 ورجن، توهان استعمال ڪري سگهو ٿا ٻيو ڪو به نسخو توهان جي سهولت مطابق.

طريقو-1: VBA استعمال ڪندي هڪ واحد قطار حذف ڪريو

چون ٿا چئو، توهان پراڊڪٽ Shoe 1، تي مشتمل قطار کي حذف ڪرڻ چاهيو ٿا ۽ هن واحد قطار کي حذف ڪرڻ لاءِ توهان هن طريقي تي عمل ڪري سگهو ٿا.

Step-01 :

➤Go to Developer Tab>> Visual Basic Option

پوءِ، Visual Basic Editor کلندو.

➤ ڏانهن وڃو Insert Tab>> Module Option

ان کان پوءِ، هڪ ماڊيول ٺاهيو ويندو.

0>18>

Step-02 :

➤ فول لکو هيٺيون ڪوڊ

9179

هتي، "سنگل" آهيڪيترن ئي حدن جو اتحاد جيڪو سيلن سان ملندڙ جلندڙ آهي تاريخ 11/12/2021 ، ۽ آخر ۾، حدون ختم ٿي وينديون.

➤دٻايو F5

نتيجو :

ان کان پوءِ، توهان انهن قطارن کي حذف ڪري ڇڏيندا جن جي هڪ خاص تاريخ 11/12/2021 .

69>

لاڳاپيل مواد: Excel VBA مخصوص ڊيٽا سان قطارون ختم ڪرڻ لاءِ (9 مثال)

مشق سيڪشن

پنهنجي طرفان مشق ڪرڻ لاءِ اسان هڪ مشق سيڪشن ڏنو آهي جيئن هيٺ ڏنل شيٽ ۾ پریکٹس . مهرباني ڪري اهو پنهنجو پاڻ ڪريو.

نتيجو

هن آرٽيڪل ۾، مون ڪوشش ڪئي ته استعمال ڪرڻ جا آسان طريقا استعمال ڪرڻ جا آسان طريقا VBA قطار کي ختم ڪرڻ. اميد ته توھان کي مفيد ملندو. جيڪڏھن توھان وٽ ڪي تجويزون يا سوال آھن، انھن کي تبصرو سيڪشن ۾ حصيداري ڪرڻ لاء آزاد محسوس ڪريو.

ورڪ شيٽ جو نالو، ۽ قطار(7)قطار نمبر چونڊيندو.

.EntireRow.Delete سڄي قطار 7 کي حذف ڪندو.

➤دٻايو F5

نتيجو :

هن طريقي سان، توهان <1 تي مشتمل قطار کي حذف ڪندا> پراڊڪٽ نالو جوتا 1 .

0> وڌيڪ پڙهو: سليم ۾ قطار کي ڪيئن ختم ڪجي: 7 طريقو

طريقو-2: ڪيترن ئي قطارن کي حذف ڪريو VBA استعمال ڪندي

جيڪڏهن توهان ڪيترن ئي قطارن کي حذف ڪرڻ چاهيو ٿا جهڙوڪ قطارون جنهن ۾ پراڊڪٽ نالن Shoe1 ، Shoe2، ۽ Shoe3 ، پوءِ توھان ھن کي فالو ڪري سگھو ٿا VBA ڪوڊ.

Step-01 :

➤Follow Step-01 of Method-1

4104

هتي، قطار نمبر 13، 10 ، ۽ 7 کي حذف ڪيو ويندو ۽ قطار نمبرن کي ترتيب سان لکڻ ۾ توھان کي لکڻو پوندو آخري قطار نمبر کان پھرين قطار نمبر تائين ھن ڪوڊ وانگر.

ٻي صورت ۾، قطار 7 وانگر پھرين قطار کي ختم ڪرڻ کان پوءِ باقي. هن قطار جي هيٺان قطارون هڪ قطار کي مٿي ٿينديون ۽ اهڙيءَ طرح قطار 10 جي قطار 9 ٿيندي، ۽ قطار 13 قطار 12 هوندي. ason، توهان صحيح قطار کي ختم ڪرڻ جي قابل نه هوندا.

➤دٻايو F5

نتيجو :

پوءِ، توھان انھن قطارن کي حذف ڪندا جن ۾ پراڊڪٽ نالن Shoe 1 ، Shoe2، ۽ Shoe3 شامل آھن.

وڌيڪ پڙهو: 1>ڪيئن ختم ڪجي هڪ کان وڌيڪ قطارون Excel ۾ (3 طريقا)

طريقو-3 : منتخب ڪندي هڪ قطار کي حذف ڪرڻ

هتي، آئون قطار کي ختم ڪرڻ جو رستو ڏيکاريندس.انهي قطار جي هڪ فعال سيل جي حوالي سان.

Step-01 :

➤Follow Step-01 of Method-1

3460

اهو قطار کي حذف ڪري ڇڏيندو جنهن ۾ هڪ فعال سيل هوندو.

25>

➤ ڪوڊ محفوظ ڪريو.

Step-02 :

➤ قطار جي ڪنهن به سيل کي چونڊيو جنهن کي توهان حذف ڪرڻ چاهيو ٿا ( هتي مون سيل چونڊيو آهي B7 )

➤ ڏانهن وڃو ڊولپر ٽيب>> Macros آپشن

26>

ان کان پوء، Macro Wizard کلي ويندو.

Macro name dltrow3 کي منتخب ڪريو ۽ رن

<3 کي دٻايو>

نتيجو :

طريقو-4: چونڊ ۾ سڀني قطارن کي حذف ڪرڻ

سڀني قطارن کي ڊليٽ ڪرڻ لاءِ توهان هن طريقي تي عمل ڪري سگهو ٿا.

Step-01 :

➤Follow Step-01 of Method-1

5731

It چونڊ جي سڀني قطارن کي حذف ڪري ڇڏيندو.

➤ ڪوڊ محفوظ ڪريو.

Step-02 :

➤ قطار جي حد کي چونڊيو جيڪو توھان ختم ڪرڻ چاھيو ٿا (هتي، مون حد منتخب ڪئي آهي B7:D9 )

➤ ڏانهن وڃو ڊولپر Tab>> Macros اختيار

ان کان پوءِ، Macro Wizard کلي ويندو.

Macro name dltrow4 کي چونڊيو. ۽ دٻايو چلايو

نتيجو :

پوءِ، توھان انھن قطارن کي حذف ڪندا جن ۾ پراڊڪٽ نالا جوتا 1 ، جيڪٽ1، ۽ Jacket2 .

وڌيڪ پڙهو: Excel ۾ چونڊيل قطارن کي ڪيئن ختم ڪجي(8 اپروچز)

طريقو-5: قطار کي ختم ڪرڻ جيڪڏهن ڪو سيل خالي هجي

هتي، مون وٽ هڪ خالي سيل آهي جيڪو آهي B9 طريقو)، ۽ هڪ VBA ڪوڊ استعمال ڪندي آئون قطار کي حذف ڪندس B9 سيل.

34>

Step-01 :

➤Follow Step-01 of Method-1

4800

اهو رينج جي سڀني قطارن کي حذف ڪري ڇڏيندو “B5:D13” ڪنهن به خالي سيل هجي.

➤دٻايو F5

نتيجو :

پوءِ، توهان خالي سيل تي مشتمل قطار کي ختم ڪرڻ جي قابل هوندا.

وڌيڪ پڙهو: ايڪسل ۾ خالي قطارون ڪيئن ختم ڪيون وڃن (11 طريقا)

طريقو-6: هڪ قطار کي ختم ڪرڻ جيڪڏهن پوري قطار خالي آهي

هتي، مون وٽ هڪ خالي سيل آهي جيڪو <1 آهي>B9 (مون هن طريقي جي قيمتن کي هٽائي ڇڏيو آهي)، ۽ هڪ خالي قطار جيڪا قطار 12 آهي (مون هن طريقي جي قيمت کي هٽايو آهي)، ۽ استعمال ڪندي هڪ VBA ڪوڊ ۽ COUNTA فنڪشن آئون ان قطار کي ختم ڪندس جيڪا خالي آهي.

Step-01 :

➤Follow Step-01 جي طريقي-1

5146

“B5:D13” ڊيٽا جي حد آهي ۽ فار لوپ هر سيل لاءِ ڪم ڪندو ھي حد.

CountA(cell.EntireRow) غير خالي سيلن جو تعداد واپس ڪندو ۽ جڏھن اھو 0 ٿي ويندو ته قطار ختم ٿي ويندي.

<38

0>➤دٻايو F5

نتيجو :

ان کان پوءِ، توهان خالي قطار کي ختم ڪرڻ جي قابل ٿي ويندا پر اهو ڪنهن به قطار کي ختم نه ڪندو جنهن ۾ سڀئي شامل نه هوندا. هن قطار جا سيلز خالي آهن.

وڌيڪ پڙهو: ايڪسل ۾ خالي قطارن کي حذف ڪرڻ لاءِ VBA ڪيئن استعمال ڪجي

طريقو-7: هر nهين قطار کي حذف ڪرڻ

توهان هن طريقي تي عمل ڪندي هر nهين قطار (هن صورت ۾ هر ٽئين قطار) کي حذف ڪري سگهو ٿا.

Step-01 :

➤Follow Step-01 of Method-1

3058

“B5 :D13” ڊيٽا جي حد آهي ۽ rc هن رينج جو ڪل قطار نمبر واپس ڪندو جيڪو 9 آهي.

هتي، فار لوپ آخري قطار کان شروع ٿيندو جيڪو هن صورت ۾ rc يا 9 آهي ۽ پهرين قطار سان ختم ٿئي ٿو.

Step-3 هن رينج ۾ هر 3rd قطار کي ختم ڪرڻ ۾ مدد ڪندو.

41>

➤دٻايو F5

نتيجو :

پوءِ، توهان پراڊڪٽ نالن تي مشتمل قطارون حذف ڪندا جوتا 1 ، جوتا 2، ۽ Shoe3 .

وڌيڪ پڙهو: هر نمبر R کي ڪيئن حذف ڪجي ow Excel ۾ (سڀ کان آسان 6 طريقا)

ساڳئي پڙھڻ:

  • سيل VBA سان چونڊيل قطارن کي ڪيئن ختم ڪجي (هڪ قدم- by-Step Guideline)
  • Delete Unused Rows in Excel (8 آسان طريقا)
  • ڪيئن ختم ڪجي ايڪسل ۾ لڪيل قطارون (3 طريقا)
  • Excel ۾ لاتعداد قطارون حذف ڪريو (5 آسان طريقا)
  • ايڪسل ۾ قطارون ڪيئن ختم ڪيون وڃن جيڪي هميشه لاءِ هلن ٿيون (4 آسان طريقا)طريقو)

طريقو-8: سيل ويليو جي بنياد تي قطار کي حذف ڪرڻ

هن طريقي ۾، مان قطار کي حذف ڪندس جنهن ۾ هڪ مخصوص قدر آهي شرٽ 2 .

01> 1
9623

“B5:D13” ڊيٽا رينج آهي ۽ فار لوپ هن رينج ۾ هر سيل لاءِ ڪم ڪندو.

جيڪڏهن قطار جي ڪنهن سيل ۾ قيمت “شرٽ 2” هجي ته پوءِ قطار ختم ٿي ويندي.

➤دٻايو F5

نتيجو :

هن طريقي سان، توهان پراڊڪٽ نالو شرٽ 2 تي مشتمل قطار کي حذف ڪندا.

49>

0> وڌيڪ پڙهو: VBA ميڪرو قطار کي ختم ڪرڻ لاءِ جيڪڏهن سيل ۾ قيمت شامل آهي Excel ۾ (2 طريقا)

طريقو-9: ڊپليڪيٽ قطارن کي حذف ڪرڻ

هتي، مون وٽ ٻه قطارون آهن جن وٽ هڪ پراڊڪٽ ڪوڊ 97375 آهي ۽ ان ڪري مان انهن قطارن مان هڪ کي حذف ڪرڻ چاهيان ٿو جنهن تي نشان لڳل آهن. هيٺ هڪ ڳاڙهي باڪس.

Step-01 :

➤Follow Step-01 of طريقو-1

3044

هتي، “B5:D13” ڊيٽا جي حد آهي ۽ ڪالمن:=1 مون جواب اهو صرف هڪ ڪالم ۾ ڊپليڪيٽ ويلز ڳوليندو جيڪو شروعاتي ڪالمن کالم B آهي پر جيڪڏهن توهان ٻين ڪالمن ۾ به ڳولڻ چاهيو ٿا ته توهان هن نمبر کي پنهنجي ضرورت مطابق استعمال ڪري سگهو ٿا.

➤دٻايو F5

نتيجو :

بعد ۾، توهان قطار کي ختم ڪرڻ جي قابل هوندا، جيڪا آهي ٻي قطار سان ملندڙ جلندڙ.

52>

0> وڌيڪ پڙهو:1>ڊپليٽ قطار کي ڪيئن ختم ڪجيExcel سان VBA (8 مؤثر طريقا)

طريقو-10: ٽيبل ۾ قطارون ختم ڪرڻ

فرض ڪريو، توھان وٽ ھيٺ ڏنل جدول آھي جنھن جو نالو آھي ٽيبل1 ۽ هاڻي توهان هن ٽيبل جي قطار نمبر 6 کي حذف ڪرڻ چاهيو ٿا. ائين ڪرڻ لاءِ توهان هن طريقي تي عمل ڪري سگهو ٿا.

Step-01 :

➤Follow Step-01 جو طريقو-1

5729

هتي، “ٽيبل” شيٽ جو نالو آهي، “ٽيبل1“ ٽيبل جو نالو آهي ۽ 6 هن ٽيبل جو قطار نمبر آهي جنهن کي توهان حذف ڪرڻ چاهيو ٿا.

➤دٻايو F5

نتيجو :

هن طريقي سان، توهان هن ٽيبل جي پنهنجي گهربل قطار کي حذف ڪندا.

55>

وڌيڪ پڙهو: Excel VBA استعمال ڪندي هڪ ڪالمن جي بنياد تي ڊپليڪيٽ قطارن کي ڪيئن هٽايو

طريقو-11: فلٽر ڪرڻ کان پوءِ نظر ايندڙ قطارن کي حذف ڪرڻ

هتي، مون وٽ هڪ ڊيٽا ٽيبل آهي جيڪا فلٽر ڪئي وئي آهي. قيمت ڪالمن کان وڌيڪ قدرن لاءِ $1,500.00 ۽ مان فلٽر ڪرڻ کان پوءِ ظاهر ٿيندڙ سڀني قطارن کي ختم ڪرڻ چاهيان ٿو.

Step-01 :

➤فالو Step-01 of طريقو-1

4427

هتي، “B5: D13” ڊيٽا رينج آهي.

➤دٻايو F5

هاڻي، فلٽر ڪرڻ کان پوءِ سڀ نظر ايندڙ قطارون ٿينديون. حذف ڪيو وڃي. توھان ھاڻي لڪيل قطارون واپس آڻي سگھوٿا منتخب ڪري فلٽر سائن ان قيمت ڪالم ۾.

58>

➤ تي ڪلڪ ڪريو سڀ منتخب ڪريو آپشن

➤دٻايو ٺيڪ 3>0>

نتيجو :

0>آخرڪار، توهان کي لڪيل قطارون واپس ملنداڊيٽا ٽيبل.

60>

0> وڌيڪ پڙهو: ڪسيل ۾ VBA سان قطار کي ڪيئن فلٽر ۽ حذف ڪريو (2 طريقا)<3

طريقو-12: آخري فعال سيل جي بنياد تي قطار کي حذف ڪرڻ

هتي، منهنجو آخري فعال سيل سيل آهي B13 ۽ مان هن کي حذف ڪرڻ چاهيان ٿو جيڪو هيٺ ڏنل آخري فعال سيل آهي. ڊيٽا جدول.

Step-01 :

➤فالو Step-01 of طريقه -1

5318

هتي، 2 مطلب ڪالمن B جنهن تي منهنجو فعال سيل آهي، توهان پنهنجي ضرورت مطابق نمبر تبديل ڪري سگهو ٿا.

➤دٻايو F5

نتيجو :

هن طريقي سان، توهان کي ختم ڪري ڇڏيندو آخري فعال قطار.

وڌيڪ پڙهو: Excel VBA ڪوڊ ختم ڪرڻ لاءِ قطارن کي ختم ڪرڻ لاءِ هڪ کان وڌيڪ سيل ويليو جي بنياد تي (3 معيار)

طريقو-13: ڪنهن به اسٽرنگ سان قطار کي حذف ڪرڻ

فرض ڪريو، توهان ڪنهن به اسٽرنگ واري قطار کي ختم ڪرڻ چاهيو ٿا، ۽ اهو ڪرڻ لاء توهان هن طريقي تي عمل ڪري سگهو ٿا.

0> 1> هتي، "string"شيٽ جو نالو آهي، ھن ڊيٽا جي حد جو پھريون قطار نمبر آھي 5۽ شروعاتي ڪالمن جو نمبر آھي 2

The With بيان توھان کي ھڪڙي اعتراض جي وضاحت ڪرڻ جي اجازت ڏئي ٿو يا بيانن جي پوري سيريز لاءِ هڪ ڀيرو استعمال ڪندڙ جي بيان ڪيل قسم.

On Error Resume Next بيان بيان ڪري ٿو ته، جڏهن رن-ٽائم غلطي ٿئي ٿي، ڪنٽرول بيان جي پٺيان بيان ڏانهن وڃي ٿو جتي غلطي ٿئي ٿي.

آخري قطار ۽ LastColumn ڊيٽا رينج جي آخري قطار ۽ ڪالمن کي واپس آڻيو.

SpecialCells(xlCellTypeConstants, xlTextValues) ان قطارون چونڊيندا جن ۾ ڪي به ٽيڪسٽ ويلز آهن. range.

➤دٻايو F5

نتيجو :

بعد ۾، توهان ڪندا ڪنهن به ٽيڪسٽ اسٽرنگ واري قطار کي حذف ڪريو.

وڌيڪ پڙهو: Excel شارٽ ڪٽ قطارن کي ختم ڪرڻ لاءِ (بونس ٽيڪنڪس سان) <3

طريقو-14: تاريخن جي بنياد تي قطار کي حذف ڪرڻ

هتي، مان انهن قطارن کي حذف ڪندس جن ۾ خاص تاريخ آهي 11/12/2021 (mm/dd/yyyy) هن ۾ طريقو استعمال ڪندي DATEVALUE فنڪشن .

Step-01 :

➤Follow Step- 01 of طريقي-1

1645

هتي، “تاريخ” شيٽ جو نالو آهي، هن ڊيٽا جي رينج جو پهريون قطار نمبر آهي 5 ۽ معيار جو ڪالم (جنهن جي ڪالمن ۾ تاريخون آهن) نمبر آهي 3 .

The With بيان توهان کي هڪ ڀيرو هڪ اعتراض يا صارف جي بيان ڪيل قسم جي وضاحت ڪرڻ جي اجازت ڏئي ٿو. بيانن جي مڪمل سيريز لاءِ.

غلطي تي ٻيهر شروع ڪريو اڳيون بيان بيان ڪري ٿو ته، جڏهن هڪ رن-ٽائم غلطي ٿئي ٿي، ڪنٽرول بيان جي پٺيان بيان ڏانهن وڃي ٿو جتي غلطي ٿئي ٿي.

LastRow ڊيٽا جي حد جي آخري قطار کي واپس ڪري ٿو ۽ هتي، لاء لوپ آخري قطار کان شروع ٿيندو جيڪو آھي آخري قطار يا 6 ھن صورت ۾، ۽ پھرين قطار سان ختم ٿئي ٿو.

DATEVALUE متن جي تاريخ کي قدر ۾ تبديل ڪندو.

هتي، يونين واپس ڪندو

Hugh West هڪ انتهائي تجربيڪار ايڪسل ٽرينر ۽ تجزيه نگار آهي جنهن سان صنعت ۾ 10 سالن کان وڌيڪ تجربو آهي. هن وٽ اڪائونٽنگ ۽ فنانس ۾ بيچلر جي ڊگري ۽ بزنس ايڊمنسٽريشن ۾ ماسٽر جي ڊگري آهي. Hugh کي تدريس جو شوق آهي ۽ هڪ منفرد تدريس وارو طريقو ٺاهيو آهي جنهن جي پيروي ڪرڻ ۽ سمجهڻ آسان آهي. Excel جي هن جي ماهر ڄاڻ سڄي دنيا ۾ هزارين شاگردن ۽ پروفيسر جي مدد ڪئي آهي انهن جي صلاحيتن کي بهتر بنائڻ ۽ انهن جي ڪيريئر ۾ شاندار. هن جي بلاگ ذريعي، هگ پنهنجي ڄاڻ کي دنيا سان حصيداري ڪري ٿو، مفت ايڪسل سبق ۽ آن لائن ٽريننگ پيش ڪري ٿو ماڻهن ۽ ڪاروبار کي انهن جي مڪمل صلاحيت تائين پهچڻ ۾ مدد ڏيڻ.