فہرست کا خانہ
VBA میں آپ آخری قطار تلاش کرنے کے لیے مختلف طریقے استعمال کر سکتے ہیں۔ اس مضمون میں، میں ایکسل میں آخری قطار تلاش کرنے کے لیے VBA کے مختلف طریقوں کی وضاحت کرنے جا رہا ہوں۔
اس وضاحت کو ظاہر کرنے کے لیے، میں ایک نمونہ ڈیٹا سیٹ استعمال کرنے جا رہا ہوں۔ ڈیٹا سیٹ میں 4 کالم ہیں جو سیلز کی معلومات کی نمائندگی کرتے ہیں۔ یہ کالم ہیں سیلز پرسن، ریجن، پروڈکٹ، اور قیمت ۔
پریکٹس کے لیے ڈاؤن لوڈ کریں
VBA Find Last Row.xlsm
VBA کے طریقے Excel میں آخری قطار تلاش کریں
1. اسپیشل سیلز کا استعمال آخری قطار تلاش کرنے کے لیے
آپ VBA کا استعمال کرتے ہوئے آخری قطار تلاش کرنے کے لیے SpecialCells طریقہ استعمال کرسکتے ہیں۔
سب سے پہلے، Developer کو کھولیں۔ ٹیب >> پھر منتخب کریں Visual Basic
کی ایک نئی ونڈو Microsoft Visual Basic for Applications پاپ اپ ہوگی۔
اب، Insert >> سے Module
A Module کو منتخب کریں۔
پھر <2 میں درج ذیل کوڈ لکھیں>Module .
9754
یہاں، میں نے ایک ذیلی طریقہ کار بنایا ہے جسے LastRow_SpecialCells کہا جاتا ہے، جہاں Long قسم متغیر کا LastRow کا اعلان کیا گیا ہے۔
پھر Range.SpecialCells طریقہ استعمال کرتے ہوئے متغیر کی وضاحت کی گئی۔ یہاں، میں نے کالم A ( A:A ) کو رینج کے طور پر استعمال کیا ہے۔ فراہم کردہ xlCellTypeLastCell کو SpecialCells کے ٹائپ پیرامیٹر کے طور پر، یہ رینج کے لیے آخری سیل لوٹائے گا (اس معاملے کے لیے، کالم سے A )۔
میں نے نتیجہ دکھانے کے لیے ایک میسج باکس استعمال کیا ہے۔
اس کے بعد، محفوظ کریں کوڈ اور واپس جائیں ورک شیٹ۔
دوبارہ، کھولیں دیکھیں ٹیب >> سے میکرو >> منتخب کریں میکروز دیکھیں
پھر، ایک ڈائیلاگ باکس پاپ اپ ہوگا۔
اب، میکرو نام سے LastRow_SpecialCells منتخب کریں Macros in کے اندر بھی ورک بک منتخب کریں۔
آخر میں، منتخب کردہ میکرو کو چلائیں۔
اس طرح، یہ ایک میسج باکس پاپ اپ کرے گا جو آخری قطار کا نمبر دکھاتا ہے۔
2. غیر خالی سیلز کے لیے Rows.Count کا استعمال
آپ VBA کا استعمال کرتے ہوئے آخری قطار تلاش کرنے کے لیے Rows.Count طریقہ استعمال کرسکتے ہیں۔ .
اب، ڈیولپر ٹیب >> کھولیں۔ پھر منتخب کریں Visual Basic
Microsoft Visual Basic for Applications کی ایک نئی ونڈو پاپ اپ ہوگی۔
اب، Insert >> سے Module
A Module کو منتخب کریں۔
پھر <2 میں درج ذیل کوڈ لکھیں>Module .
7194
یہاں، میں نے LastRow_NonEmpty نامی ایک ذیلی طریقہ کار بنایا ہے، جہاں ایک Long قسم کی متغیر LastRow کا اعلان کر دیا گیا ہے۔
اب، CELLS(Rows.Count, 1) شمار کرے گا کہ پہلے کالم میں کتنی قطاریں ہیں۔ پھر استعمال کیا گیا End(xlUp).Row اب یہ ایکسل رینج میں آخری استعمال شدہ قطار تلاش کرے گا۔
آخر میں، میں نے میسج باکس کا استعمال کیا ہےنتیجہ۔
پھر، کوڈ کو محفوظ کریں اور ورک شیٹ پر واپس جائیں۔
یہاں، کھولیں دیکھیں ٹیب >> سے میکرو >> منتخب کریں میکروز دیکھیں
اب، ایک ڈائیلاگ باکس پپ اپ ہوگا۔
پھر، میکرو نام سے LastRow_NonEmpty منتخب کریں Macros in کے اندر بھی ورک بک منتخب کریں۔
آخر میں، منتخب کردہ میکرو کو چلائیں۔
اس طرح، یہ ایک میسج باکس پاپ اپ کرے گا جو آخری قطار کا نمبر دکھاتا ہے۔
3. کسی بھی منتخب کالم کے لیے Rows.Count کا استعمال کرتے ہوئے
VBA، میں کسی بھی منتخب کالم کا استعمال کرکے آپ آخری قطار تلاش کرسکتے ہیں۔
پہلی ، کھولیں ڈیولپر ٹیب >> پھر منتخب کریں Visual Basic
کی ایک نئی ونڈو Microsoft Visual Basic for Applications پاپ اپ ہوگی۔
اب، Insert >> سے Module
A Module کو منتخب کریں۔
پھر <2 میں درج ذیل کوڈ لکھیں>Module .
3006
یہاں، میں نے LastRow_AnyColumn نامی ایک ذیلی طریقہ کار بنایا ہے، جہاں ایک Long قسم کی متغیر LastRow کا اعلان کر دیا گیا ہے۔
پھر، رینج میں کالم B کو بطور پیرامیٹر دیا گیا ہے اور ساتھ ہی Rows.Count ، یہ شمار کرے گا کہ دیئے گئے کالم B میں کتنی قطاریں ہیں۔ اگلا، استعمال کیا جاتا ہے End(xlup)۔ قطار جو ایکسل رینج میں آخری استعمال شدہ قطار تلاش کرے گی۔
آخری، میں نے میسج باکس کا استعمال کیا ہےنتیجہ۔
اگلا، کوڈ کو محفوظ کریں اور ورک شیٹ پر واپس جائیں۔
پھر، کھولیں دیکھیں ٹیب >> سے میکرو >> منتخب کریں میکروز دیکھیں
یہاں، ایک ڈائیلاگ باکس پاپ اپ ہوگا۔
اب، میکرو نام سے منتخب کریں LastRow_AnyColumn Macros in کے اندر موجود ورک بک کو بھی منتخب کریں۔
آخر میں، منتخب کردہ میکرو کو چلائیں۔
اس طرح، یہ ایک میسج باکس پاپ اپ کرے گا جس میں آخری قطار کا نمبر دکھایا جائے گا۔
اسی طرح کی ریڈنگز:
- VBA ایکسل میں کالم میں تلاش کریں (7 نقطہ نظر)
- VBA کا استعمال کرتے ہوئے تلاش کریں اور تبدیل کریں (11) طریقے)
- ایکسل میں VBA کا استعمال کرتے ہوئے عین مطابق میچ تلاش کریں (5 طریقے)
- ایکسل میں VBA کے ساتھ سٹرنگ کیسے تلاش کریں (8 مثالیں)
4. آخری قطار تلاش کرنے کے لیے UsedRange کا استعمال
آپ آخری قطار تلاش کرنے کے لیے ورک شیٹ کی UsedRange خاصیت استعمال کرسکتے ہیں۔ VBA کا استعمال کرتے ہوئے قطار۔
اب، ڈیولپر ٹیب >> کو کھولیں۔ پھر منتخب کریں Visual Basic
پھر، Microsoft Visual Basic for Applications کی ایک نئی ونڈو پاپ اپ ہوگی۔
اب، سے داخل کریں >> منتخب کریں ماڈیول
A ماڈیول کھل جائے گا۔
پھر، درج ذیل کوڈ کو ماڈیول .
6824
یہاں، میں نے LastRow_UsedRange نامی ایک ذیلی طریقہ کار بنایا ہے، جہاں ایک Long قسم کی متغیر LastRow کا اعلان کر دیا گیا ہے۔
اگلا، کی وضاحت کی گئی ہے۔ ActiveSheet.UsedRange.Rows طریقہ کا استعمال کرتے ہوئے متغیر بھی فراہم کردہ ActiveSheet.UsedRange.Rows.Count کو ActiveSheet.UsedRange.Rows کے پیرامیٹر کے طور پر، یہ واپس کرے گا۔ آخری قطار۔
میں نے نتیجہ دکھانے کے لیے ایک میسج باکس استعمال کیا ہے۔
اب، محفوظ کریں کوڈ اور ورک شیٹ پر واپس جائیں۔
پھر، کھولیں دیکھیں ٹیب >> سے میکرو >> منتخب کریں میکروز دیکھیں
اس کے بعد، ایک ڈائیلاگ باکس پاپ اپ ہوگا۔
پھر، میکرو سے نام منتخب کریں LastRow_UsedRange Macros in کے اندر بھی ورک بک کو منتخب کریں۔
آخر میں، چلائیں منتخب کردہ میکرو >.
اس طرح، یہ ایک میسج باکس پاپ اپ کرے گا جس میں آخری قطار کا نمبر دکھایا جائے گا۔
5. Range.Find کا استعمال آخری تلاش کرنے کے لیے قطار
آپ VBA کا استعمال کرتے ہوئے آخری قطار تلاش کرنے کے لیے Range.Find طریقہ استعمال کرسکتے ہیں۔
اب، <2 کھولیں>ڈویلپر ٹیب >> پھر منتخب کریں Visual Basic
یہاں، Microsoft Visual Basic for Applications کی ایک نئی ونڈو پاپ اپ ہوگی۔
اب، سے داخل کریں >> منتخب کریں Module
A Module کھل جائے گا۔
پھر مندرجہ ذیل کوڈ کو Module میں لکھیں۔
2706
یہاں، میں نے ایک ذیلی طریقہ کار بنایا ہے جسے Range_Find_Method کہا جاتا ہے، جہاں ایک Long قسم کی متغیر LastRow کا اعلان کیا گیا ہے۔ .
پھر Cells.Find طریقہ استعمال کرتے ہوئے متغیر کی وضاحت کی۔ یہاں، 7 کا اعلان کیا۔پیرامیٹرز What پیرامیٹر میں نے استعمال کیا ("*") جو پہلا غیر خالی سیل تلاش کرے گا۔ دیا گیا A1 کی حد کے طور پر کے بعد پیرامیٹر شروع کرنے کے لیے۔ سیل کے اندر موجود متن کے کسی بھی حصے کو دیکھنے کے لیے LookAt پیرامیٹر فراہم کردہ xlPart میں۔
LookIn:=xlFormulas پیرامیٹر تلاش کرے گا۔ فارمولے اگر کوئی ہیں۔ SearchOrder:=xlByRows پیرامیٹر دائیں سے بائیں چلے گا اور ہر قطار میں اس وقت تک لوپ اپ ہو جائے گا جب تک کہ اسے کوئی خالی سیل نہ ملے۔
MatchCase:=False پیرامیٹر Find کو بتائے گا کہ بڑے یا چھوٹے حروف پر غور نہ کریں۔ جب کوئی غیر خالی پایا جاتا ہے تو یہ رک جاتا ہے اور قطار نمبر لوٹاتا ہے۔
میں نے نتیجہ دکھانے کے لیے ایک میسج باکس استعمال کیا ہے۔
اب، محفوظ کریں کوڈ اور ورک شیٹ پر واپس جائیں۔
یہاں، کھولیں دیکھیں ٹیب >> سے میکرو >> منتخب کریں میکروز دیکھیں
16>
اب، ایک ڈائیلاگ باکس پاپ اپ ہوگا۔
اب، میکرو نام سے منتخب کریں رینج_فائنڈ_میتھڈ میکروز میں کے اندر بھی ورک شیٹ کو منتخب کریں۔
آخر میں، منتخب کردہ میکرو کو چلائیں۔
اس طرح، یہ ایک میسج باکس ظاہر کرے گا جو آخری قطار کا نمبر دکھائے گا۔
نتیجہ
اس مضمون میں، میں نے VBA ایکسل میں آخری قطار تلاش کرنے کے 5 طریقے بتائے ہیں۔ آپ آخری قطار تلاش کرنے کے لیے کسی بھی طریقے پر عمل کر سکتے ہیں۔ اگر آپ کو ان طریقوں سے متعلق کوئی الجھن یا سوال ہے تو آپ کر سکتے ہیں۔نیچے تبصرہ کریں۔
