اگر آپ VBA کا استعمال کرتے ہوئے سبسٹرنگ تلاش کرنے کے کچھ آسان ترین طریقے تلاش کر رہے ہیں، تو آپ صحیح جگہ پر ہیں۔ اس مضمون کو دیکھنے کے بعد، آپ اس سب اسٹرنگ کا استعمال کرتے ہوئے سب اسٹرنگ کی پوزیشن تلاش کر سکیں گے یا ڈیٹا نکال سکیں گے یا آسانی سے سب اسٹرنگ کا فارمیٹ تبدیل کر سکیں گے۔ آئیے مضمون میں آتے ہیں۔

ورک بک ڈاؤن لوڈ کریں

VBA کا استعمال کرتے ہوئے سبسٹرنگ تلاش کرنے کے 9 طریقے

یہاں، میرے پاس درج ذیل ہیں ڈیٹا ٹیبل جس کے ذریعے میں VBA کا استعمال کرتے ہوئے سٹرنگ میں سبسٹرنگ تلاش کرنے کے طریقے دکھاؤں گا۔ میں رینڈم سٹرنگ میں سب سٹرنگ تلاش کرنے کے طریقے بھی دکھانے کی کوشش کروں گا۔

میں نے یہ کام Microsoft Excel 365 ورژن استعمال کرکے انجام دیا ہے، آپ اپنی سہولت کے مطابق کوئی دوسرا ورژن استعمال کرسکتے ہیں۔

طریقہ-1: VBA کا استعمال کرتے ہوئے سٹرنگ میں سبسٹرنگ تلاش کرنا

اگر آپ VBA کا استعمال کرتے ہوئے سٹرنگ میں اپنی مطلوبہ سبسٹرنگ تلاش کرنا چاہتے ہیں تو آپ VBA کوڈ میں انسٹر فنکشن <12 11>Visual Basic Option

پھر، Visual Basic Editor کھل جائے گا۔

➤ <11 پر جائیں>Insert Tab>> ماڈیول آپشن

اس کے بعد، ایک ماڈیول بن جائے گا۔

Step-02 :

➤ درج ذیل کوڈ لکھیں

6337

یہاں، InStr(1, “ میرے خیال میں اس لیے میں ہوں"، "سوچیں") سٹرنگ کے سب اسٹرنگ کی پوزیشن واپس کر دے گا۔ 1 یہ ہے۔شروع کی پوزیشن، " میرے خیال میں اس لیے میں ہوں" وہ سٹرنگ ہے جہاں آپ کو اپنی مطلوبہ سبسٹرنگ ملے گی، اور "think" وہ سب اسٹرنگ ہے جسے آپ ڈھونڈنا چاہتے ہیں۔ یہ بطور ڈیفالٹ کیس حساس ہوتا ہے لہذا آپ جس سب اسٹرنگ کو تلاش کرنا چاہتے ہیں اس سے ہوشیار رہیں۔

➤ دبائیں F5

نتیجہ :

اس کے بعد، آپ کو درج ذیل میسج باکس مل جائے گا جس میں "سوچیں" سبسٹرنگ کی پوزیشن ہوگی۔

طریقہ-2: سٹرنگ میں کیس غیر حساس ذیلی اسٹرنگ کو تلاش کرنا

اگر آپ VBA کا استعمال کرتے ہوئے کیس سے قطع نظر اپنی مطلوبہ ذیلی اسٹرنگ کو تلاش کرنا چاہتے ہیں، تو اس پر عمل کریں۔ طریقہ۔

مرحلہ-01 :

➤ فالو کریں مرحلہ-01 کا طریقہ -1

6297

یہاں، vbTextCompare کیس غیر حساس ذیلی اسٹرنگ کو تلاش کرنے کے لیے استعمال کیا جاتا ہے۔

➤ دبائیں F5

نتیجہ :

پھر، آپ کو درج ذیل میسج باکس مل جائے گا جس میں "سوچیں" سبسٹرنگ کی پوزیشن ہوگی۔

آپ درج ذیل کوڈ کا استعمال کرکے بھی ایسا ہی کرسکتے ہیں۔

4909

یہاں، آپشن کمپیئر ٹیکسٹ کیس غیر حساس ذیلی اسٹرنگ تلاش کرے گا۔

➤ دبائیں F5

نتیجہ :

اس کے بعد، آپ ذیل میں ملے گا میسج باکس جس میں "think" substring کی پوزیشن موجود ہے۔

طریقہ 3: InstrRev فنکشن کا استعمال VBA میں

یہاں، میں a کے آخر سے سبسٹرنگ تلاش کرنے کا راستہ دکھاؤں گا۔string.

Step-01 :

➤Follow Step-01 of طریقہ-1

9410

InStrRev بائیں جانب کی بجائے دائیں جانب سے سبسٹرنگ تلاش کرے گا۔

22>

➤دبائیں F5

نتیجہ :

پھر، آپ کو مندرجہ ذیل میسج باکس دوسرے کی پوزیشن پر مشتمل ہوگا "I" سے ذیلی دائیں طرف۔

طریقہ 4: ڈیٹا کی ایک رینج میں سٹرنگ میں سبسٹرنگ کی پوزیشن تلاش کرنا

اگر آپ اسپیشل کریکٹر تلاش کرنا چاہتے ہیں “@” ای میل آئی ڈی میں، پھر اس طریقہ پر عمل کریں۔ میں نے اس مقصد کے لیے یہاں پوزیشن کالم شامل کیا ہے۔

24>

Step-01 :

➤فالو کریں مرحلہ-01 کا طریقہ 1

7602

یہ ایک فنکشن بنائے گا جس کا نام ہے FindSubstring (آپ کوئی اور نام استعمال کرسکتے ہیں)

ویلیو وہ سیل حوالہ ہے جس میں سٹرنگ ہوتی ہے اور اسے رینج کے طور پر قرار دیا جاتا ہے۔

25>

مرحلہ -02 :

➤آؤٹ پٹ کو منتخب کریں سیل E5

➤ درج ذیل فنکشن کو ٹائپ کریں ( VBA کے ذریعہ تخلیق کیا گیا ہے)

=FindSubstring(D5)

D5 وہ سیل ہے جس میں سٹرنگ ہے۔

➤ دبائیں ENTER

➤ نیچے گھسیٹیں Fill ہینڈل ٹول

نتیجہ :

اس کے بعد، آپ کو ای میل آئی ڈی میں خصوصی کردار “ @” کی پوزیشنز ملیں گی۔

اسی طرح کی ریڈنگز:

• کیسے تلاش کریںایکسل میں VBA کا استعمال کرتے ہوئے سیل میں سٹرنگ (2 طریقے)
• ایکسل میں VBA کا استعمال کرتے ہوئے اگلا تلاش کریں (2 مثالیں)
• اس کے ساتھ سٹرنگ کیسے تلاش کریں ایکسل میں VBA (8 مثالیں)
• VBA ایکسل میں آخری قطار تلاش کریں (5 طریقے)

طریقہ -5: ایک مخصوص سبسٹرنگ کو چیک کرنا ڈیٹا کی ایک رینج میں ایک سٹرنگ

فرض کریں، آپ نتیجے کے کالم پر منحصر طلباء کے ناموں کے ساتھ پاس یا مطابقت کرنے میں ناکام لکھنا چاہتے ہیں جہاں پاس یا فیل ایک بریکٹ میں لکھا گیا ہے۔ اس ذیلی اسٹرنگ کو نتائج کے کالم میں تلاش کرنے کے لیے اور اسے پاس یا فیل کالم میں لکھیں اس طریقہ پر عمل کریں۔

Step-01 :

➤Follow Step-01 of Method-1

4305

یہاں، سیل رینج ہے C5:C10 جو کہ نتائج کا کالم ہے

InStr(cell.value, "Pass") > 0 وہ حالت ہے جہاں نمبر صفر سے زیادہ ہوتا ہے (جب سیل میں "Pass" ) ہوتا ہے تو مندرجہ ذیل لائن جاری رہے گی اور ملحقہ سیل میں آؤٹ پٹ بطور پاسڈ<12 دے گی۔>.

اگر شرط غلط ہو جاتی ہے تو اس کا مطلب ہے کہ سیل میں کوئی "Pass" نہیں ہے، پھر Else کے نیچے کی لائن عمل کرے گی اور آؤٹ پٹ ویلیو دے گی۔ ملحقہ سیل بطور ناکام ۔

یہ لوپ ہر سیل کے لیے جاری رہے گا۔

➤ دبائیں F5

نتیجہ :

پھر، آپ کو پاس یا فیل میں درج ذیل آؤٹ پٹ ملیں گے۔ کالم۔

طریقہ 6: سٹرنگ میں کسی مخصوص ذیلی اسٹرنگ کو چیک کرنا اور ڈیٹا نکالنا

میں نام والے طلبہ کو تلاش کرنے کا راستہ دکھاؤں گا۔ مائیکل طالب علم کے نام کے کالم میں اور اس طریقہ میں VBA کا استعمال کرتے ہوئے ان کا متعلقہ ڈیٹا نکالیں۔

11 11>B100 بطور ایکٹو شیٹ رینج لیکن آپ اپنے استعمال کے مطابق کسی بھی رینج کو استعمال کرسکتے ہیں۔

InStr(1, Range("B" & i), "Michael") > 0 یہ چیک کرنے کی شرط ہے کہ آیا سیل میں کالم B پر مشتمل ہے مائیکل

Range("E" & icount & ":G" & icount) وہ رینج ہے جہاں آپ اپنا آؤٹ پٹ ڈیٹا چاہتے ہیں اور Range("B" & i & ":D" & i).value ویلیوز دے گا۔ کالم B سے D تک۔

➤ دبائیں F5

نتیجہ :

اس کے بعد، آپ کو مائیکل نام رکھنے والے طلبہ کے لیے درج ذیل نکالا گیا ڈیٹا ملے گا۔

<38

طریقہ-7: لفظ کے لیے سبسٹرنگ تلاش کرنا

اگر آپ سب اسٹرنگ کو بطور لفظ تلاش کرنا چاہتے ہیں، تو فول۔ اس طریقہ کو کم کریں

6670

یہ چیک کرے گا کہ آیا اسٹرنگ میں ہے اور پھر اس کی پوزیشن دی جائے گی

➤ دبائیں F5

نتیجہ :

اس کے بعد، آپ کو درج ذیل میسج باکس ملے گا جو ظاہر کرتا ہے کہ لفظ پوزیشن میں پایا گیا:6 (<11 کی پوزیشن>ہے )۔

آپ جانچ کر سکتے ہیں۔اس کوڈ کو کسی ایسے لفظ کے لیے نکالیں جو اسٹرنگ میں نہیں ہے۔

➤ درج ذیل کوڈ کو ٹائپ کریں

3323

➤ دبائیں F5

نتیجہ :

اس کے بعد، آپ کو درج ذیل میسج باکس ملے گا جو ظاہر کرتا ہے کہ لفظ نہیں ملا ۔

طریقہ-8: Instr اور LEFT فنکشن کا استعمال کرتے ہوئے

یہاں، میں اسٹرنگ میں سب اسٹرنگ کی پوزیشن تلاش کرنے کا طریقہ بتاؤں گا اور کا استعمال کرکے اس سب اسٹرنگ سے پہلے ٹیکسٹس کو نکالوں گا۔ VBA اور LEFT فنکشن ۔

Step-01 :

➤Follow Step-01 of طریقہ-1

5416

j = InStr(txt, "is") سب اسٹرنگ کی پوزیشن ہے ہے اور Left(txt, j - 1) <11 سے پہلے سب اسٹرنگ نکالے گا۔>ہے ۔

➤ دبائیں F5

نتیجہ :

اس کے بعد، آپ کو مندرجہ ذیل میسج باکس ملے گا جو ظاہر کرتا ہے یہاں ( اس سے پہلے سبسٹرنگ )۔

44>

طریقہ -9: بولڈنگ اسٹرنگ میں ایک مخصوص ذیلی اسٹرنگ

آپ اس طریقہ کار پر عمل کرتے ہوئے نتائج کے کالم میں بریکٹ سے پہلے درجات کو بولڈ کرسکتے ہیں۔ d.

Step-01 :

➤Follow Step-01 of طریقہ- 1

6116

txt = InStr(1, Cell, "(") پہلے بریکٹ کی پوزیشن واپس کرے گا اور Cell.Characters(1, txt - 1).Font.Bold پہلے بریکٹ بولڈ سے پہلے سبسٹرنگ بنائے گا۔

Step-02 :

➤ نتائج کا کالم منتخب کریں

➤جائے۔ ڈیولپر ٹیب>> میکروز آپشن

پھر، ایک میکرو وزرڈ ظاہر ہوگا۔

➤ بولڈنگ سبسٹرنگ (VBA کوڈ کا نام) کو منتخب کریں اور پھر چلائیں ۔

نتیجہ :

اس کے بعد، نتیجہ کالم میں درجات بولڈ ہو جائیں گے۔

<49

پریکٹس سیکشن

خود سے پریکٹس کرنے کے لیے ہم نے ذیل میں پریکٹس نامی شیٹ کی طرح ایک پریکٹس سیکشن فراہم کیا ہے۔ براہ کرم اسے خود کریں۔

نتیجہ

اس مضمون میں، میں نے VBA کا استعمال کرتے ہوئے سب اسٹرنگ تلاش کرنے کے آسان ترین طریقوں کا احاطہ کرنے کی کوشش کی۔ مؤثر طریقے سے ایکسل میں۔ امید ہے کہ آپ کو یہ مفید لگے گا۔ اگر آپ کے پاس کوئی مشورے یا سوالات ہیں تو بلا جھجھک ان کا ہمارے ساتھ اشتراک کریں۔