مواد جي جدول
VBA ۾ توهان آخري قطار ڳولڻ لاءِ مختلف طريقا استعمال ڪري سگهو ٿا. هن آرٽيڪل ۾، مان وضاحت ڪرڻ وارو آهيان VBA جا مختلف طريقا ڳولڻ لاءِ آخري قطار Excel ۾.
هن وضاحت کي ظاهر ڪرڻ لاءِ، مان هڪ نموني ڊيٽا سيٽ استعمال ڪرڻ وارو آهيان. ڊيٽا سيٽ ۾ 4 ڪالمن آھن جيڪي سيلز جي معلومات جي نمائندگي ڪن ٿا. اهي ڪالم آهن سيلز پرسن، ريجن، پراڊڪٽ، ۽ قيمت 5>.
مشق ڪرڻ لاءِ ڊائونلوڊ ڪريو
VBA ڳوليو آخري قطار آخري قطار ڳولڻ لاءِتوهان استعمال ڪري سگهو ٿا SpecialCells طريقو استعمال ڪندي آخري قطار ڳولڻ لاءِ VBA .
پهرين، کوليو ڊولپر tab >> پوءِ چونڊيو Visual Basic
13>
هڪ نئين ونڊو Microsoft Visual Basic for Applications پاپ اپ ٿيندي.
ھاڻي، مان Insert >> منتخب ڪريو Module
A Module کوليو ويندو.
پوءِ هيٺ ڏنل ڪوڊ لکو Module .
7900
هتي، مون هڪ ذيلي پروسيس ٺاهيو آهي جنهن کي سڏيو ويندو آهي LastRow_SpecialCells ، جتي هڪ Dong قسم variable of LastRow کي قرار ڏنو ويو آهي.
پوءِ Range.SpecialCells طريقو استعمال ڪندي متغير جي وضاحت ڪئي وئي. هتي، مون ڪالم استعمال ڪيو آهي A ( A:A ) حد جي طور تي. مهيا ڪيل xlCellTypeLastCell جيئن SpecialCells جي ٽائيپ پيراميٽر، هي رينج لاءِ آخري سيل واپس ڪندو (هن ڪيس لاءِ، ڪالمن مان A ).
مون نتيجو ڏيکارڻ لاءِ ميسيج باڪس استعمال ڪيو آهي.
ان کان پوءِ، محفوظ ڪريو ڪوڊ ۽ واپس وڃو ورڪ شيٽ.
ٻيهر، کوليو ڏسو ٽيب >> مان Macros >> منتخب ڪريو Macros ڏسو
16>
پوءِ، هڪ ڊائيلاگ باڪس پاپ اپ ٿيندو.
هاڻي، مان ميڪرو جو نالو منتخب ڪريو LastRow_SpecialCells پڻ Macros ۾ اندر ورڪ بڪ چونڊيو.
آخرڪار، هلايو چونڊيل Macro .
اهڙيءَ طرح، اهو هڪ ميسيج باڪس ظاهر ڪندو جيڪو آخري قطار نمبر ڏيکاريندو.
2. غير خالي سيلن لاءِ Rows.Count استعمال ڪندي
توهان استعمال ڪري سگهو ٿا Rows.Count طريقو استعمال ڪندي آخري قطار ڳولڻ لاءِ VBA .
هاڻي، کوليو ڊولپر ٽيب >> پوءِ چونڊيو Visual Basic
19>
هڪ نئين ونڊو Microsoft Visual Basic for Applications پاپ اپ ٿيندي.
ھاڻي، مان Insert >> منتخب ڪريو Module
A Module کوليو ويندو.
پوءِ هيٺ ڏنل ڪوڊ لکو Module .
2941
هتي، مون LastRow_NonEmpty نالي هڪ ذيلي پروسيس ٺاهيو آهي، جتي هڪ Dong قسم جي متغير LastRow اعلان ڪيو ويو آهي.
هاڻي، سيل (قطار. شمار، 1) ڳڻپ ڪندو ته پهرين ڪالمن ۾ ڪيتريون قطارون آهن. پوءِ استعمال ڪيو ويو End(xlUp).Row ھاڻي ھي ملندو آخري استعمال ٿيل قطار Excel range ۾.
آخر ۾، مون ھڪ ميسيج باڪس استعمال ڪيو آھي ڏيکارڻ لاءِ.نتيجو.
پوءِ، محفوظ ڪريو ڪوڊ ۽ ورڪس شيٽ تي واپس وڃو.
هتي، کوليو ڏسو ٽيب >> مان Macros >> منتخب ڪريو ميڪروز ڏسو
19>1>
هاڻي، هڪ ڊائيلاگ باڪس پاپ اپ ٿيندو.
پوءِ، مان ميڪرو جو نالو منتخب ڪريو آخري رو_نان خالي پڻ ميڪرو ۾ اندر ورڪ بڪ چونڊيو.
آخرڪار، هلايو منتخب ٿيل Macro .
اهڙيءَ طرح، اهو هڪ ميسيج باڪس ظاهر ڪندو جيڪو آخري قطار نمبر ڏيکاريندو.
3. ڪنهن به چونڊيل ڪالمن لاءِ Rows.Count استعمال ڪندي
VBA، ۾ ڪنهن به چونڊيل ڪالمن کي استعمال ڪندي، توهان آخري قطار ڳولي سگهو ٿا.
پهريون , کوليو Dveloper tab >> پوءِ چونڊيو Visual Basic
13>
هڪ نئين ونڊو Microsoft Visual Basic for Applications پاپ اپ ٿيندي.
ھاڻي، مان Insert >> منتخب ڪريو Module
A Module کوليو ويندو.
پوءِ هيٺ ڏنل ڪوڊ لکو Module .
6794
هتي، مون LastRow_AnyColumn نالي هڪ ذيلي پروسيس ٺاهيو آهي، جتي هڪ Dong قسم جي متغير LastRow قرار ڏنو ويو آهي.
پوءِ، رينج ۾ ڪالم B پيراميٽر طور ڏنو ويو ۽ پڻ قطار. شمار ، هي ڳڻپ ڪندو ته ڏنل ڪالمن ۾ ڪيتريون قطارون آهن B . اڳيون، استعمال ڪيو End (xlup). قطار جيڪو هڪسل رينج ۾ آخري استعمال ٿيل قطار ڳوليندو.
آخري، مون کي ڏيکارڻ لاءِ ميسيج باڪس استعمال ڪيو آهي.نتيجو.
اڳيون، محفوظ ڪريو ڪوڊ ۽ ورڪس شيٽ ڏانهن واپس وڃو.
پوءِ، کوليو ڏسو ٽيب >> مان Macros >> منتخب ڪريو ميڪروز ڏسو
16>1>
هتي، هڪ ڊائيلاگ باڪس پاپ اپ ٿيندو.
24>
هاڻي، مان ميڪرو نالو منتخب ڪريو آخري رو_AnyColumn پڻ Macros ۾ اندر ورڪ بڪ چونڊيو.
آخرڪار، هلايو منتخب ٿيل Macro .
اهڙيءَ طرح، اهو هڪ ميسيج باڪس ظاهر ڪندو جيڪو آخري قطار نمبر ڏيکاريندو.
11 طريقا)
4. آخري قطار ڳولڻ لاءِ UsedRange استعمال ڪندي
توهان آخري قطار ڳولڻ لاءِ ورڪ شيٽ جي UsedRange ملڪيت استعمال ڪري سگهو ٿا قطار استعمال ڪندي VBA .
هاڻي، کوليو ڊولپر ٽيب >> پوءِ چونڊيو Visual Basic
پوءِ، هڪ نئين ونڊو Microsoft Visual Basic for Applications پاپ اپ ٿيندي.
هاڻي، مان Insert >> منتخب ڪريو Module
A Module کوليو ويندو.
پوءِ هيٺ ڏنل ڪوڊ لکو ماڊيول .
7698
هتي، مون LastRow_UsedRange نالي هڪ ذيلي پروسيس ٺاهيو آهي، جتي هڪ Dong قسم جو متغير LastRow کي قرار ڏنو ويو آهي.
اڳيون، وضاحت ڪئي وئيvariable استعمال ڪندي ActiveSheet.UsedRange.Rows طريقو پڻ مهيا ڪيو ويو آهي ActiveSheet.UsedRange.Rows.Count جي پيراميٽر جي طور تي ActiveSheet.UsedRange.Rows ، هي واپس ڪندو آخري قطار.
مون نتيجو ڏيکارڻ لاءِ ميسيج باڪس استعمال ڪيو آهي.
هاڻي، محفوظ ڪريو ڪوڊ ۽ ورڪس شيٽ ڏانهن واپس وڃو.
پوءِ، کوليو ڏسو ٽيب >> مان Macros >> منتخب ڪريو ڏسو ميڪرو
>0>16>اڳيون، هڪ ڊائيلاگ باڪسپاپ اپ ٿيندو.پوءِ، مان ميڪرو نالو منتخب ڪريو LastRow_UsedRange پڻ Macros ۾ اندر ورڪ بڪ چونڊيو.
آخر ۾، چلايو چونڊيل Macro .
اهڙيءَ طرح، اهو هڪ ميسيج باڪس پاپ اپ ڪندو جيڪو ڏيکاريندو آخري قطار نمبر.
5. استعمال ڪندي Range.Find to Find Last قطار
توهان استعمال ڪري سگهو ٿا Range.Find طريقو آخري قطار ڳولڻ لاءِ VBA .
هاڻي، کوليو ڊولپر ٽيب >> پوءِ چونڊيو Visual Basic
هتي، هڪ نئين ونڊو Microsoft Visual Basic for Applications پاپ اپ ٿيندي.
هاڻي، تان داخل ڪريو >> منتخب ڪريو Module
A Module کوليو ويندو.
پوءِ هيٺ ڏنل ڪوڊ کي Module ۾ لکو.
8914
هتي، مون هڪ ذيلي پروسيس ٺاهيو آهي جنهن کي Range_Find_Method سڏيو ويندو آهي، جتي هڪ Dong قسم جي متغير LastRow کي قرار ڏنو ويو آهي. .
پوءِ Cells.Find طريقو استعمال ڪندي متغير جي وضاحت ڪئي. هتي، اعلان ڪيو 7پيرا ميٽر. ۾ ڇا پيراميٽر مون استعمال ڪيو (“*”) جيڪو پهريون غير خالي سيل ڳوليندو. ڏنو ويو A1 جيئن رينج ۾ بعد ۾ پيراميٽر شروع ڪرڻ لاءِ. LookAt پيراميٽر مهيا ڪيو ويو آهي xlPart سيل اندر متن جي ڪنهن به حصي کي ڏسڻ لاءِ.
LookIn:=xlFormulas پيراميٽر ڳوليندا. فارمولا جيڪڏهن ڪو آهن. SearchOrder:=xlByRows پيراميٽر ساڄي کان کاٻي طرف ھلندو ۽ ھر قطار مان لوپ به ڪندو جيستائين اھو غير خالي سيل نه ڳولي.
MatchCase:=False parameter ٻڌائيندو Find اپر يا لوئر ڪيس اکر تي غور نه ڪرڻ. جڏهن ڪو غير خالي ملي ٿو ته اهو روڪي ٿو ۽ قطار نمبر واپس ڪري ٿو.
مون نتيجو ڏيکارڻ لاءِ ميسيج باڪس استعمال ڪيو آهي.
هاڻي، محفوظ ڪريو ڪوڊ ۽ ورڪس شيٽ ڏانهن واپس وڃو.
هتي، کوليو ڏسو ٽيب >> مان Macros >> چونڊيو ميڪروز ڏسو
16>1>
هاڻي، هڪ ڊائيلاگ باڪس پاپ اپ ٿيندو.
هاڻي، مان ميڪرو جو نالو منتخب ڪريو رينج_فائنڊ_مٿڊ پڻ ورڪس شيٽ کي به چونڊيو ميڪرو ان ۾ .
آخرڪار، هلايو منتخب ٿيل Macro .
اهڙيءَ طرح، اهو هڪ ميسيج باڪس ظاهر ڪندو جيڪو آخري قطار نمبر ڏيکاريندو.
نتيجو
هن آرٽيڪل ۾، مون وضاحت ڪئي آهي 5 طريقن سان VBA Excel ۾ آخري قطار ڳولڻ لاءِ. توهان آخري قطار ڳولڻ لاء طريقن مان ڪنهن جي پيروي ڪري سگهو ٿا. جيڪڏهن توهان وٽ انهن طريقن جي حوالي سان ڪو مونجهارو يا سوال آهي ته توهان ڪري سگهو ٿاھيٺ ڏنل تبصرو.