VBA InStr | ایکسل VBA InStr فنکشن کو استعمال کرنے کے لئے اوپر 5 مثالیں

ایکسل VBA InStr فنکشن

وی بی اے میں انسٹر جب ہم فنکشن سے موازنہ کا طریقہ بتاتے ہیں ، اسٹرنگ میں دیئے گئے اسٹریننگ کی پوزیشن معلوم کرنے کے لئے استعمال کیا جاتا ہے ، اس فنکشن کے لئے چار مختلف موازنہ کے طریقے ہیں ، انسٹر ایک سٹرنگ فنکشن ہے لیکن فنکشن کے ذریعہ واپس آؤٹ پٹ عددی ہے لہذا آؤٹ پٹ یہ فنکشن ایک عددی متغیر میں ہے۔

وی بی اے میں سٹرنگ حرفوں کی ایک سیریز کے سوا کچھ نہیں ہے۔ یعنی تمام نصوص جو ڈبل حوالوں سے فراہم کی گئیں ہیں ، اسے ڈور سمجھا جاتا ہے۔ InStr فنکشن ایک بلٹ ان ٹیکسٹ فنکشن ہے جو اسٹرنگس کو جوڑنے کے لئے استعمال ہوتا ہے۔ مثال کے طور پر - اگر آپ کسی جملے سے سب اسٹریننگ نکالنا چاہتے ہیں یا اگر آپ فونٹ ڈیزائن کی تبدیلیوں کو کسی خاص سٹرنگ میں حرفوں کی ایک سیریز میں لاگو کرنا چاہتے ہیں یا اگر آپ کسی کردار کی حیثیت اور دیگر بہت سے امکانات تلاش کرنا چاہتے ہیں تو آپ استعمال کرسکتے ہیں۔ InStr.

نحو

اس میں 4 دلائل ہیں جیسا کہ نیچے کی تصویر میں دکھایا گیا ہے۔

  • [اسٹارٹ]: یہ لازمی نہیں ہے۔ یہ وہ عددی قدر ہے جس کی ہمیں وضاحت کرنے کی ضرورت ہے جس سے انسٹر انسٹریشن فنکشن کی فراہمی کے متن کو تلاش کرنا شروع ہوتا ہے۔ مثال کے طور پر: اگر آپ کردار تلاش کرنا چاہتے ہیں "ایک" لفظ میں "بنگلور" تیسری پوزیشن سے ہمیں انسٹری فنکشن کو شروع کرنے کی پوزیشن 3 بتانے کی ضرورت ہے۔ لہذا تیسری پوزیشن کے کردار سے "ایک" پانچویں پوزیشن پر ہے۔ اگر آپ اس پیرامیٹر کو نظر انداز کرتے ہیں تو پہلے سے طے شدہ قیمت 1 ہوتی ہے۔
  • سٹرنگ 1: یہ اصل تار ہے جس کی ہم فراہمی کر رہے ہیں یعنی اس عبارت سے ہم سب اسٹرننگ تلاش کرنے کی کوشش کر رہے ہیں۔ مثال کے طور پر ، اگر آپ سٹرنگ ڈھونڈ رہے ہیں "ایک" میں "بنگلور" ، اسٹرنگ 1 بنگلور میں۔
  • سٹرنگ 2: یہ اس کے سوا کچھ نہیں ہے جس کی ہم تلاش کر رہے ہیں۔ مثال کے طور پر ، اگر آپ سٹرنگ ڈھونڈ رہے ہیں "ایک" میں "بنگلور" ، سٹرنگ 2 ہے a.
  • [موازنہ]: یہ پھر ایک اختیاری دلیل ہے۔ [موازنہ] دلیل میں تین طرح کے اختیارات دستیاب ہیں۔

  • وی بی بائنریکمپیر: اسٹرنگ 1 میں اسٹریننگ (سٹرنگ 2) کی ایک حساس حساس تلاش کے سوا کچھ نہیں ہے۔ مثال کے طور پر ، اگر ہم تلاش کررہے ہیں "ایک" لفظ میں "بنگلور" انسٹر 2 کے نتیجے میں واپس آئے گا اور اگر آپ تلاش کر رہے ہیں "A" لفظ میں "بنگلور" انسٹر 0 کے نتیجے میں واپس آجائے گا کیونکہ فراہم کردہ سٹرنگ اوپری کیس ویلیو ہے۔

ہم صفر (0) بھی دلیل کے طور پر ڈال سکتے ہیں۔

vbTextCompare: اسٹرنگ 1 میں اسٹرنگ 2 کی کوئی معاملہ حساس نہیں ہے۔ مثال کے طور پر ، اگر ہم تلاش کررہے ہیں "ایک" لفظ میں "بنگلور" انسٹر 2 کے نتیجے میں واپس آئے گا اور اگر آپ تلاش کر رہے ہیں "A" لفظ میں "بنگلور" انسٹر 2 بھی لوٹ آئے گا۔ منطق A = a ، B = b ، C = c وغیرہ ہے….

ہم ایک (1) کو بھی بطور دلیل پیش کر سکتے ہیں۔

وی بی ڈیٹا بیسکمپیر: اس کا استعمال آپ کے ڈیٹا بیس یعنی مائیکروسافٹ ایکسیس ڈیٹا بیس سے حاصل کردہ معلومات کا موازنہ کرنے کے لئے کیا جاتا ہے۔

ہم ایک (-1) بھی دلیل کے طور پر رکھ سکتے ہیں۔

وی بی اے انسٹر فنکشن کے استعمال کی سرفہرست 5 مثالوں

آپ یہ VBA Instr Function Excel سانچہ ڈاؤن لوڈ کرسکتے ہیں۔ VBA Instr Function Excel سانچہ

مثال # 1

آئیے پہلی مثال کے ساتھ شروعات کریں۔ لفظ میں بنگلور کردار کی پوزیشن تلاش کریں a.

ذیل میں کوڈ ہمارے لئے کام انجام دے گا۔

کوڈ:

 سب انسٹر_اختیار 1 () دم i As Variant i = InStr ("بنگلور" ، "ا") MsgBox i End Sub 

اب ایف 5 کلید کا استعمال کرکے مذکورہ بالا دیا گیا وی بی اے کوڈ چلائیں یا آپ ذیل میں دیئے گئے اسکرین شاٹ میں دکھائے گئے مطابق اس کوڈ کو دستی طور پر بھی چلا سکتے ہیں۔

آؤٹ پٹ:

مثال # 2

اب لفظ میں بنگلور کردار کی پوزیشن تلاش کریں "ایک" تیسری پوزیشن سے.

مندرجہ ذیل کوڈ ہمارے لئے کام انجام دے گا۔

کوڈ:

 سب انسٹر_اختیار 2 () دم i As Variant i = InStr (3، "بنگلور"، "ا") MsgBox i End Sub 

مذکورہ بالا کوڈ کو چلانے کے ل you ، آپ F5 کلید کا استعمال کرسکتے ہیں یا ذیل میں اسکرین شاٹ میں دکھایا گیا ہے کے طور پر آپ اس کوڈ کو دستی طور پر بھی چلا سکتے ہیں۔

آؤٹ پٹ:

اب مذکورہ تصویر میں ، پچھلے کوڈ سے فرق دیکھیں۔ چونکہ ہم نے کردار کی ابتدائی حیثیت 3 کے طور پر ذکر کی ہے اس نے پہلے کردار کو نظرانداز کیا "ایک" دوسری پوزیشن پر۔

مثال # 3

اب ہم کیس حساس تلاش کریں گے۔ لفظ میں بنگلور خط تلاش کریں "اے"۔

اس کے ل we ، ہمیں موازنہ دلیل فراہم کرنا ہوگا vbBinaryCompare۔

کوڈ:

 سب انسٹر_اختیار3 () ڈیم i As Variant i = InStr (1 ، "بنگلور" ، "A" ، vbBinaryCompare) MsgBox i End Sub 

اب چلائیں ، اس کوڈ کو ایف 5 کلید کا استعمال کریں یا آپ اس کوڈ کو دستی طور پر بھی چلا سکتے ہیں۔

آؤٹ پٹ:

چونکہ ہم نے موازنہ کی دلیل فراہم کی ہے vbBinaryCompare انسٹر فنکشن نے نتیجہ صفر کے بطور واپس کردیا کیونکہ یہاں کوئی بڑے حرف نہیں ہیں "A" موجود ہے۔

مثال # 4

اب ہم ایک اور معاملہ حساس تلاش کریں گے۔ لفظ میں بنگلور خط تلاش کریں "اے"۔ پچھلی مثال نے نتیجہ صفر کے طور پر واپس کیا۔

یہاں کیس حساس روش پر قابو پانے کے ل we ، ہمیں موازنہ کی دلیل فراہم کرنے کی ضرورت ہے vbTextCompare.

کوڈ:

 سب انسٹر_اختیار 4 () دھیم کے طور پر متغیر i = InStr (1 ، "بنگلور" ، "A" ، vbTextCompare) MsgBox i End Sub 

اب چلائیں ، اس کوڈ کو F5 کلید کا استعمال کریں یا آپ بھی اس کوڈ کو دستی طور پر چلا سکتے ہیں۔

آؤٹ پٹ:

مثال # 5

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

مثال کے طور پر ، میرے پاس 5 شیٹ ہیں خلاصہ 1 ، خلاصہ 2 ، خلاصہ 3 ، خلاصہ 4 ، اور ڈیٹا شیٹ۔

اب میں ان تمام چادروں کو چھپانا چاہتا ہوں جن میں یہ لفظ ہے "خلاصہ"۔ تمام شیٹس کو چھپانے کے لئے نیچے کا کوڈ استعمال کریں جس کے نام میں سمریڈ لفظ ہے۔

کوڈ:

 سب ٹو ہاہیڈ_پیسیفیکیٹ شیٹ () ایکٹ ورک ورک بک میں ہر Ws کے لئے ورک شیٹ کے طور پر Dim Ws.Worksheets اگر InStr (Ws.Name، "خلاصہ")> 0 پھر Ws.Visible = xlSheetVeryHided اختتام اگر اگلی Ws کا InStr فنکشن شیٹ کے نام میں لفظ یا فقرے کی تلاش کرتا ہے۔ 'اگر یہ ڈھونڈتا ہے تو یہ چھپی ہو گی اینڈ سب سب 

اب چلائیں ، اس کوڈ کو ایف 5 کلید کا استعمال کریں یا آپ بھی اس کوڈ کو دستی طور پر چلا سکتے ہیں اور آؤٹ پٹ دیکھ سکتے ہیں۔

اسی طرح ان تمام شیٹوں کو چھپانے کے لئے نیچے کا کوڈ استعمال کریں۔

کوڈ:

 سب To_UnHide_Specific_Sheet () ایکٹ ورک ورک بک میں ہر Ws کی ورک شیٹ کے طور پر Dim Ws.Worksheets اگر InStr (Ws.Name، "خلاصہ")> 0 پھر Ws.Visible = xlSheetVisible اختتام اگر اگلی Ws کا InStr فنکشن شیٹ کے نام یا جملے کو تلاش کرتا ہے۔ 'اگر یہ ڈھونڈتا ہے تو یہ چھپی ہو گی اینڈ سب 

اب چلائیں ، اس کوڈ کو ایف 5 کلید کا استعمال کریں یا آپ بھی اس کوڈ کو دستی طور پر چلا سکتے ہیں اور آؤٹ پٹ کو بھی دیکھ سکتے ہیں۔

یاد رکھنے والی چیزیں

  • انسٹر ایک کیس حساس فعل ہے۔ اس معاملے کو حساس مسئلے کو ختم کرنے کے ل you ، آپ کو [موازنہ] دلیل کی فراہمی کی ضرورت ہے۔
  • اگر آپ معاملہ حساس کردار تلاش کررہے ہیں تو آپ کو [موازنہ] دلیل فراہم کرنے کی ضرورت ہے جیسا کہ ڈیفالٹ وی بی اے اس کو دلیل کے طور پر لیتا ہے یہاں تک کہ اگر آپ کی فراہمی نہیں ہے۔
  • انسٹر ایک وی بی اے فنکشن ہے تاکہ آپ اسے دوسرے بلٹ ان فارمولوں کی طرح ایکسل ورک شیٹ میں استعمال نہیں کرسکتے ہیں۔
  • اگر فنکشن سٹرنگ 2 نہیں ڈھونڈ سکتا ہے تو نتیجہ صفر ہوگا۔