وی بی اے آخری قطار | آخری استعمال شدہ قطار کو تلاش کرنے کے لئے اوپر 3 طریقے؟
وی بی اے میں جب ہمیں آخری صف ڈھونڈنا ہو تو بہت سارے مختلف طریقے موجود ہیں اور سب سے زیادہ عام طور پر استعمال ہونے والا طریقہ اختتام (ایکس ایل ڈاون) طریقہ ہے اور دوسرے طریقے بھی موجود ہیں جیسے وی بی اے ، اینڈ (ایکس ایل ڈاون) میں فائنڈ فنکشن کا استعمال کرتے ہوئے آخری قیمت کو تلاش کرنا۔ ). آخری قطار تک جانے کا آسان راستہ قطار ہے۔
ایکسل وی بی اے آخری قطار
اگر کوڈ کو لکھنا پہلی پیشرفت ہے جو آپ نے VBA میں کی ہے تو پھر کوڈ کو متحرک بنانا آپ کے لئے اگلا مرحلہ ہے۔ ایکسل سیل حوالوں سے بھرا ہوا ہے ، جس وقت ہم سیل کا حوالہ دیتے ہیں وہ فکس ہوجاتا ہے۔ اگر ہمارا ڈیٹا بڑھتا ہے تو ہمیں سیل ریفرنس پر واپس جانے اور نتائج کو تازہ ترین بنانے کے لئے ریفرنسز کو تبدیل کرنے کی ضرورت ہے۔
مثال کے طور پر نیچے کا کوڈ دیکھیں۔
کوڈ:
سب آخری_رو_اختیار 1 () حد ("D2")۔ قدر = ورکشیٹ فنکشن۔سم (حد ("B2: B7")) اختتامی سب
مذکورہ کوڈ کا کہنا ہے کہ D2 سیل ویلیو میں رینج کا خلاصہ ہونا چاہئے ("B2: B7")۔
اب میں اس فہرست میں مزید اقدار شامل کروں گا۔
اب اگر میں کوڈ چلاتا ہوں تو ، اس سے مجھے تازہ کاری کا نتیجہ نہیں ملے گا بلکہ یہ اب بھی پرانی رینج یعنی رینج (“B2: B7”) سے چپک جاتا ہے۔
یہ وہ مقام ہے جہاں متحرک کوڈ بہت اہم ہے۔
کوڈ کو متحرک بنانے کے عمل میں ، کالم میں آخری استعمال شدہ قطار تلاش کرنا بہت ضروری ہے۔ اس مضمون میں ، ہم ایکسل وی بی اے میں آخری صف تلاش کرنے کے طریقوں پر تبادلہ خیال کریں گے۔
کالم میں آخری استعمال شدہ قطار کیسے تلاش کی جائے؟
ذیل میں ایکسل وی بی اے میں استعمال شدہ آخری قطار تلاش کرنے کے لئے مثالیں ہیں۔
آپ یہ وی بی اے آخری قطار ٹیمپلیٹ ڈاؤن لوڈ کرسکتے ہیں۔ وی بی اے آخری قطار ٹیمپلیٹطریقہ # 1
اس سے پہلے کہ میں آپ کو کوڈ سمجھاؤں ، میں چاہتا ہوں کہ آپ یاد رکھیں کہ آپ عام ورکشیٹ میں آخری صف میں کیسے جاتے ہیں۔
ہم شارٹ کٹ کی کو استعمال کریں گے Ctrl + نیچے تیر.
یہ ہمیں کسی خالی سیل سے پہلے آخری استعمال شدہ قطار میں لے جائے گا۔ ہم آخری قطار تلاش کرنے کے لئے وی بی اے میں بھی وہی طریقہ استعمال کریں گے۔
مرحلہ نمبر 1: متغیر کی وضاحت LONG کے طور پر کریں۔
کوڈ:
سب آخری_راو_اختیار 2 () LR کو سمجھنے کے ل D Dim LR 'لمبا کریں' آخری قطار اختتام سب
مرحلہ 2: اس متغیر کے ل we ، ہم آخری استعمال شدہ قطار نمبر تفویض کریں گے۔
کوڈ:
سب آخری_راو_اصاحب 2 () LR = Dim DR D Long 'جب تک ایل آر کو سمجھنے کے لئے = آخری قطار LR = آخر سب
مرحلہ 3: جیسے کوڈ لکھیں سیل (قطاریں ، حساب ،
کوڈ:
سب آخری_راو_اختیار 2 () LR = Dim DR D Long 'جب تک LR = آخری قطار LR = سیل سمجھنے کے ل ((قطاریں۔ حساب ، اختتامی سب
مرحلہ 4: اب کالم نمبر 1 کا ذکر کریں۔
کوڈ:
سب آخری_راو_اختیار 2 () LR = Dim DR D Long 'جب تک LR = آخری قطار LR = سیل (قطاریں۔ حساب ، 1) سمجھنے کے لئے اختتامی سب
سیل (قطاریں ، حساب ، 1) پہلے کالم میں کتنی قطاریں ہیں اس کی گنتی کرنا۔
تو مذکورہ بالا وی بی اے کوڈ ہمیں ایکسل شیٹ کی آخری صف میں لے جائے گا۔
مرحلہ 5: اگر ہم آخری استعمال شدہ قطار میں جانے کے لئے شیٹ کے آخری سیل میں ہیں تو ہم شارٹ کٹ کی کو دبائیں گے Ctrl + اوپر تیر چابی.
وی بی اے میں ہمیں اختتامی چابی اور اس طرح کے آخر میں وی بی اے ایکس ایل یو پی کو استعمال کرنے کی ضرورت ہے
کوڈ:
سب آخری_راو_اصاحب 2 () LR = Dim DR D Long 'جب تک LR = آخری قطار LR = سیل (قطاریں۔ حساب ، 1) سمجھنے کے ل.۔ آخر (xlUp) اختتامی سب
مرحلہ 6: اب یہ ہمیں نیچے سے آخری استعمال ہونے والی قطار تک لے جائے گا۔ اب ہمیں اس کی صف نمبر کی ضرورت ہے۔ لہذا صف نمبر حاصل کرنے کے لئے پراپرٹی ROW کا استعمال کریں۔
کوڈ:
سب آخری_راو_اصاحب 2 () LR = Dim DR D Long 'سمجھنے کے لئے LR = آخری قطار LR = سیل (قطاریں۔ حساب ، 1)۔ اختتام (xlUp) ۔واقعہ آخر سب
مرحلہ 7: اب متغیر میں آخری استعمال شدہ قطار نمبر موجود ہے۔ وی بی اے کوڈ میں میسج باکس میں اس متغیر کی قدر دکھائیں۔
کوڈ:
سب آخری_راو_اختیار 2 () LR = Dim DR D Long 'سمجھنے کے ل L LR = آخری قطار LR = سیل (Row.Count، 1). اور (xlUp) .رو MsgBox LR آخر سب
اس کوڈ کو F5 کلید یا دستی طور پر استعمال کریں ، یہ آخری استعمال شدہ قطار دکھائے گا۔
آؤٹ پٹ:
اس ورک شیٹ میں آخری استعمال شدہ قطار 13 ہے۔
اب میں ایک اور لائن کو حذف کروں گا اور کوڈ چلاؤں گا اور کوڈ کی حرکیات دیکھوں گا۔
ٹھیک ہے ، اب نتیجہ خود بخود آخری صف لے جاتا ہے۔
متحرک VBA آخری صف کا کوڈ یہی ہے۔
جیسا کہ میں نے پہلے کی مثال میں دکھایا ہے کہ صف نمبر کو عددی قدر سے LR میں تبدیل کریں۔
کوڈ:
سب آخری_راو_اختیار 2 () DL LR As Long 'سمجھنے کے ل L LR = آخری قطار LR = سیل (Row.Count، 1). اینڈ (xlUp) .رو رینج ("D2"). ویلیو = ورکشیٹ فنکشن. رینج ("B2:" B "& LR)) اختتام سب
میں نے B13 کو ہٹا دیا ہے اور متغیر کا نام LR شامل کیا ہے۔
اب اس سے کوئی فرق نہیں پڑتا ہے کہ آپ اسے کتنی قطاریں شامل کرتے ہیں خود بخود تازہ ترین حوالہ لے جائے گا۔
طریقہ # 2
رینج آبجیکٹ اور خصوصی وی بی اے سیل سیل پراپرٹی کو بھی استعمال کرکے ہم وی بی اے میں آخری قطار تلاش کرسکتے ہیں۔
کوڈ:
سب آخری_رو_قسمیample3 () دھیما ایل آر جتنا طویل ایل آر = حد ("A: A")۔ اسپیشل سیل (xlCellTypeLastCell) .Row MsgBox LR End Sub
کوڈ آپ کو آخری استعمال شدہ قطار بھی فراہم کرتا ہے۔ مثال کے طور پر ، ذیل میں ورک شیٹ کی تصویر دیکھیں۔
اگر میں کوڈ کو دستی طور پر چلاتا ہوں یا F5 کلیدی نتیجہ کا استعمال 12 ہوگا کیونکہ 12 آخری استعمال ہونے والی قطار ہے۔
آؤٹ پٹ:
اب میں 12 ویں قطار کو حذف کروں گا اور اس کا نتیجہ دیکھوں گا۔
اگرچہ میں نے ایک صف کو حذف کردیا ہے لیکن یہ ابھی بھی نتیجہ 12 کے طور پر دکھا رہا ہے۔
اس کوڈ کو کام کرنے کے ل we ہمیں ہر عمل کے بعد سیف بٹن کو ہٹانے کی ضرورت ہے ، تب اس کوڈ کے درست نتائج برآمد ہوں گے۔
میں نے ورک بک کو محفوظ کرلیا ہے اور اب اس کا نتیجہ دیکھتا ہوں۔
طریقہ # 3
ہم استعمال شدہ حد میں وی بی اے کی آخری صف تلاش کرسکتے ہیں۔ کوڈ کے نیچے آخری استعمال شدہ قطار بھی لوٹاتا ہے۔
کوڈ:
سب آخری_رو_قسمی44 () ڈم ایل آر جیسا لانگ ایل آر = ایکٹو شیٹ.ایسڈرینج ڈاٹ آرز (ایکٹو شیٹ.ایسڈرینج ڈاٹ آرز.کاؤنٹ) ۔رو ایم جی بوکس ایل آر اینڈ سب
یہ آخری استعمال شدہ قطار بھی واپس کردے گی۔
آؤٹ پٹ: