ايڪسل ۾ VBA سان اسٽرنگ ڪيئن ڳولهجي (8 مثال)

  • هن کي شيئر ڪريو
Hugh West

لاڳو ڪرڻ VBA سڀ کان وڌيڪ اثرائتو، تيز ترين ۽ محفوظ طريقو آهي Excel ۾ ڪنهن به آپريشن کي هلائڻ لاءِ. هن آرٽيڪل ۾، اسان توهان کي ڏيکارينداسين ته ڪيئن ڪجهه اسٽرنگ کي ڪنهن ٻئي ڏنل اسٽرنگ ۾ ڳوليندا VBA Excel ۾ استعمال ڪندي.

ڊائون لوڊ مشق سانچو

توهان هتي مان مفت مشق Excel ٽيمپليٽ ڊائون لوڊ ڪري سگهو ٿا.

VBA کي ڳولڻ لاءِ String.xlsm

InStr فنڪشن

Microsoft Excel ۾ هڪ بلٽ ان فنڪشن آهي جنهن کي The InStr Function ڪنهن ڏنل اسٽرنگ ۾ مخصوص اسٽرنگ جي پوزيشن معلوم ڪرڻ لاءِ چيو ويندو آهي.

Generic Syntax:

InStr([start], string1, string2, [compare])

هتي،

8> دلائل گهربل/ اختياري تعريف 13>10> شروع 15> اختياري ڳولا جي شروعاتي پوزيشن.
  • ڊفالٽ طور، InStr فنڪشن 1 مان ڳڻپ ڪندي ڪردار جي پوزيشن کي ڳڻائي ٿو، نه شروعاتي پوزيشن کان. سو، جيڪڏھن توھان چاھيو ته ھن کي خالي ڇڏي سگھوٿا.
string1 گھربل ڳولھڻ لاءِ اسٽرنگ، پرائمري اسٽرنگ. string2 گھربل پرائمري اسٽرنگ ۾ ڳولھڻ لاءِ اسٽرنگ . compare اختياري InStr فنڪشن ڊفالٽ جي صورت ۾ حساس آهي. پر جيڪڏھن توھان چاھيو ٿا ھڪڙو ڪيس غير حساس InStr ، ته پوءِ توھان ھتي دليل پاس ڪري سگھوٿا ھڪڙي خاص مقابلي لاءِ. هن دليل هيٺ ٿي سگهي ٿوقدر،
  • vbBinaryCompare -> بائنري مقابلي کي انجام ڏئي ٿو، واپسي جي قيمت 0
  • vbTextCompare -> متن جي مقابلي کي انجام ڏئي ٿو، واپسي جي قيمت 1
  • vbDatabaseCompare -> ڊيٽابيس جي مقابلي کي انجام ڏئي ٿو، واپسي جي قيمت 2

ڊفالٽ طور، InStr وٺندو آهي vbBinaryCompare compare argument طور.

8 آسان مثال ڏنل اسٽرنگ ۾ مخصوص اسٽرنگ پوزيشن ڳولڻ لاءِ VBA استعمال ڪندي

اچو ڪجھ سادو مثال ڏسون ته ڏنل اسٽرنگ ۾ مخصوص اسٽرنگ جي پوزيشن حاصل ڪرڻ لاءِ 1 اسٽرنگ ۾ متن جي پوزيشن.

  • دٻايو Alt + F11 پنھنجي ڪيبورڊ تي يا ٽيب ڏانھن وڃو ڊولپر -> Visual Basic کولڻ لاءِ Visual Basic Editor .

  • پاپ اپ ڪوڊ ونڊو ۾، مينيو بار مان ڪلڪ ڪريو داخل ڪريو -> ماڊل .

  • هاڻي ڪوڊ ونڊو ۾، هڪ VBA سب جي اندر هڪ سادي InStr پروگرام لکو. طريقيڪار (هيٺ ڏسو).
5865

توهان جو ڪوڊ هاڻي هلڻ لاءِ تيار آهي.

  • دٻايو F5 توهان جي ڪي بورڊ تي يا مينيو بار مان چونڊيو چلايو -> هلايو Sub/UserForm . توھان صرف ڪلڪ ڪري سگھوٿا small Play icon ذيلي مينيو بار ۾ ميڪرو کي هلائڻ لاءِ.

توھان ڏسندا ته پاپ اپ ميسيج باڪس توهان کي نمبر ڏيندومتن جي پوزيشن کي بيان ڪندي جنهن کي توهان چيڪ ڪرڻ چاهيو ٿا.

وضاحت:

اسان جو بنيادي اسٽرنگ، “ خوشي is a choice ” 21 اکرن وارو جملو آهي (اسپيس سان) ۽ اسان ان اسٽرنگ ۾ ” چوائس “ متن جي پوزيشن ڳولڻ چاهيون ٿا. ٽيڪسٽ “ چوائس “ پرائمري اسٽرنگ جي 16هين پوزيشن کان شروع ٿيو، ان ڪري اسان کي ميسيج باڪس ۾ اسان جي آئوٽ پٽ طور نمبر 16 مليو.

<22 2. اسٽرنگ ۾ مخصوص پوزيشن مان متن ڳولڻ لاءِ VBA

هاڻي اچو ته اهو معلوم ڪريون ته ڇا ٿيندو جيڪڏهن اسان چاهيون ٿا ته ڪنهن خاص نمبر مان پوزيشن حاصل ڪجي.

  • ساڳئي طريقي سان ان کان اڳ، کوليو Visual Basic Editor مان Developer tab ۽ Insert a Module ڪوڊ ونڊو ۾.
  • ان ۾ ڪوڊ ونڊو ۾، مٿي ڏيکاريل هڪ سادي InStr پروگرام لکو ۽ شروعاتي دليل ۾ ان پوزيشن جي مطابق پاس ڪريو جتي توهان پنهنجي ٽيڪسٽ کي ڳڻڻ چاهيو ٿا.
5681

  • اڳيون، چلايو ڪوڊ.
  • 19>

    توهان ڏسندا ته پاپ اپ ميسيج باڪس ٿيندو توهان کي هڪ نمبر ڏيو جيڪو بيان ڪري ٿو پوزيشن جي متن جي شروع ڪندي هڪ خاص پوزيشن کان جنهن کي توهان چيڪ ڪرڻ چاهيو ٿا.

    وضاحت:

    جيئن ته اسان اڳ ۾ ئي ڄاڻون ٿا (مرحلي 1 بحث کان) ته متن “ چوائس ” جي پوزيشن کان شروع ٿيو 16 ، تنهنڪري اسان ٻه داخل ڪيا“. چونڊ “ پرائمري اسٽرنگ ۾ ۽ سيٽ ڪريو 17 اسان جي طور تي1st parameter کي ڇڏڻ لاءِ پهرين ” چونڊ “. تنهن ڪري، اسان چلايو مٿيون ميڪرو ۽ اهو اسان کي ڏيکاريو پوزيشن نمبر 27 جيڪو بلڪل پوزيشن نمبر آهي سيڪنڊ چوائس ” ڏنل اسٽرنگ ۾.

    3. اسٽرنگ ۾ Case-insensitive InStr فنڪشن سان متن ڳولڻ لاءِ VBA

    InStr فنڪشن جي تعارف کان توهان کي پهريان ئي خبر آهي ته ڊفالٽ طور، InStr فنڪشن ڪيس حساس آهي. اچو ته ان کي هڪ مثال سان ڳولهيون.

    هيٺ ڏسو VBA ڪوڊ، جتي اسان لفظ جي پوزيشن ڳولڻ چاهيون ٿا “ چوائس ” سان ڪيپيٽل “سي” اسٽرنگ ۾ “ خوشي هڪ چونڊ آهي “ جتي چوائس هڪ ننڍي “سي” سان لکيل آهي. .

    • چلايو ڪوڊ ۽ ڳولهيو 0 اسان جي آئوٽ جي طور تي.

    اهو ئي سبب آهي جو InStr فنڪشن capital “C” ۽ small “c” مختلف طرح سان علاج ڪري ٿو. تنهن ڪري هن اسٽرنگ ۾ لفظ ” چوائس “ ڳولهيو ۽ ڪو به ملائي نه سگهيو، تنهنڪري واپس آيو 0 .

      <17 InStr فنڪشن case-insensitive ڪرڻ لاءِ، compare argument to vbTextCompare (هيٺ ڏسو).
    7641

    • چلايو ڪوڊ.
    • 19>

      36>

      توهان حاصل ڪندا ٽيڪسٽ جي پوزيشن اسٽرنگ مان، ڇا متن لکيل آهي ڪيپيٽل اکر يا ننڍن اکرن ۾ .

      4. اسٽرنگ جي ساڄي پاسي کان متن ڳولڻ لاءِ VBA

      هن وقت تائين InStr فنڪشن صرف اسان کي اسٽرنگ جي کاٻي پاسي کان پوزيشن ڏئي رهيو هو. پر ڇا جيڪڏھن توھان ڳولھڻ چاھيو ٿا متن جي پوزيشن اسٽرنگ جي ساڄي پاسي کان.

      InStrRev فنڪشن ساڄي پاسي کان ڳولھي ٿو. InStrRev فنڪشن InStr فنڪشن سان بلڪل ساڳيو ڪم ڪري ٿو ۽ اهو توهان کي اسٽرنگ جي ساڄي پاسي کان متن جي پوزيشن ڳوليندو.

      فرق کي سمجھڻ لاءِ ھيٺ ڏنل مثال ڏسو.

      • جيڪڏھن اسان ھيٺ ڏنل ڪوڊ کي InStr فنڪشن سان هلون ٿا ته پوءِ،

      اهو اسان کي پهرين متن جي پوزيشن ( 16 ) ڏئي ٿو “ چونڊ “.

      • پر جيڪڏهن اسان اهو ئي ڪوڊ هلائيندا آهيون InStrRev فنڪشن سان، پوءِ

      38>

      اهو اسان کي پوزيشن ڏئي ٿو. ( 27 ) آخري متن جو ” چونڊ “.

      ملندڙ پڙهڻ:

      >16>17> ايڪسل ۾ VBA استعمال ڪندي اڳيون ڳوليو (2 مثال)
    • VBA استعمال ڪندي ڪيئن ڳولھيو ۽ تبديل ڪريو (11 طريقا)
    • ايڪسل ۾ VBA استعمال ڪندي درست ميچ ڳوليو (5 طريقا) 18>19>

      5. اسٽرنگ ۾ هڪ ڪردار جي پوزيشن ڳولڻ لاءِ VBA

      توهان هڪ خاص ڪردار جي پوزيشن کي پڻ ڳولي سگهو ٿا هڪ اسٽرنگ ۾ ساڳئي طرح توهان کي متن مليو آهي.

      • ڪپي ڪريو هيٺ ڏنل ڪوڊ توهان جي VBA ڪوڊ ونڊو
      7374

      16>
    • ۽ چلايو ميڪرو.

    اسان جي ڏنل اسٽرنگ ۾ پهريون ” e “ آهينمبر 7 پوزيشن.

    6. اسٽرنگ ۾ سبسٽرنگ ڳولڻ لاءِ VBA

    هتي اسان سکنداسين ته ڪيئن معلوم ڪجي ته ڪنهن اسٽرنگ ۾ سب اسٽرينگ آهي يا نه.

    ان کي حاصل ڪرڻ لاءِ، اسان وٽ آهي. اسان جي ڪوڊ ۾ IF بيان کي هلائڻ لاءِ.

    • اڳي وانگر، کوليو Visual Basic Editor مان Developer ٽئب ۽ ڪوڊ ونڊو ۾ Insert a Module
    • ڪوڊ ونڊو ۾، ھيٺ ڏنل ڪوڊ ڪاپي ڪري ان کي پيسٽ ڪريو.
    6517

    توھان جو ڪوڊ ھاڻي ھاڻي ھلڻ لاءِ تيار آھي.

    • چلايو ميڪرو.

    جيڪڏهن توهان جي اسٽرنگ ۾ سب اسٽرينگ شامل آهي ته پوءِ توهان کي هڪ ميچ مليو ملندو، ٻي صورت ۾، اهو موٽندو ته ڪوبه ميچ نه مليو. اسان جي مثال ۾، اسان اهو معلوم ڪرڻ چاهيون ٿا ته ڇا اسان جي بنيادي اسٽرنگ " خوشيءَ هڪ چونڊ آهي " لفظ تي مشتمل آهي " چوائس " يا نه جيئن ته اهو ٿئي ٿو، اسان هڪ حاصل ڪيو Match found نتيجو.

    7. سيل رينج ۾ اسٽرنگ ڳولڻ لاءِ VBA

    توهان اسٽرنگ جي سيل رينج ۾ هڪ خاص متن ڳولي سگهو ٿا ۽ هڪ خاص اسٽرنگ واپس ڪري سگهو ٿا.

    هيٺ ڏنل مثال ڏسو جتي اسان ڪنداسين " ڊاڪٽر " ڳولھيو ۽ جڏھن ھڪڙو ميچ ٿيندو اھو واپس ايندو " ڊاڪٽر ".

    • هيٺ ڏنل ڪوڊ حاصل ڪرڻ لاءِ مٿي ڄاڻايل نتيجو حاصل ڪرڻ لاءِ،
    2731

    16>
  • چلايو ڪوڊ ۽ نتيجو هيٺ ڏيکاريل آهي

45>

16>17>توهان پنهنجي ضرورت مطابق ميڪرو کي تبديل ڪري سگهو ٿا. مثال طور، جيڪڏهن توهان چاهيو ٿا" پروفيسر " ڳولڻ لاءِ سٽرنگ جي ڪنهن به سيل ۾، ۽ حاصل ڪريو " پروفيسر " واپسي طور، پوءِ بس پاس ڪريو " پروفيسر ” قدر جي بدران “ ڊاڪٽر . ميڪرو جي چوٿين لڪير ۾ ۽ " پروفيسر " جي بدران " ڊاڪٽر " ميڪرو جي 5 هين لائين ۾ ۽ وضاحت ڪريو. سيل رينج نمبر مطابق.

8. VBA هڪ سيل ۾ اسٽرنگ ڳولڻ لاءِ

توهان پڻ ڪري سگهو ٿا اسٽرنگ جي هڪ سيل ۾ هڪ خاص متن ڳوليو ۽ واپسي هڪ خاص اسٽرنگ.

  • هيٺ ڏنل ڪوڊ ڪاپي ڪريو ۽ ان کي ڪوڊ ونڊو ۾ پيسٽ ڪريو.
2939

اهو ڳوليندو “ ڊاڪٽر سيل B5 ۾ ۽ جيڪڏهن اهو ملندو ته پوءِ واپس اچي ٿو “ ڊاڪٽر “ ان ۾ سيل C5 .

16>17>توهان پنهنجي ضرورت مطابق ميڪرو کي تبديل ڪري سگهو ٿا. مثال طور، جيڪڏھن توھان چاھيو ٿا " Prof. " کي ڳولھيو string جي ڪنھن سيل ۾، ۽ حاصل ڪريو " Professor " جيئن واپسي، پوءِ بس پاس ڪريو “ Prof. ” کي قدر جي بدران “ Dr . ميڪرو جي 2nd لائن ۾ ۽ " پروفيسر " جي بدران " ڊاڪٽر " ميڪرو جي 3rd لائين ۾ ۽ وضاحت ڪريو سيل ريفرنس نمبر مطابق.

نتيجو

هي آرٽيڪل توهان کي ڏيکاريو ته ڪيئن حاصل ڪجي ڪجهه متن کي ايڪسل ۾ اسٽرنگ ۾ VBA ميڪرو استعمال ڪندي. مون کي اميد آهي ته هي مضمون توهان لاءِ تمام گهڻو فائديمند رهيو آهي. جي حوالي سان ڪنهن به سوال پڇڻ لاء آزاد محسوسموضوع.

Hugh West هڪ انتهائي تجربيڪار ايڪسل ٽرينر ۽ تجزيه نگار آهي جنهن سان صنعت ۾ 10 سالن کان وڌيڪ تجربو آهي. هن وٽ اڪائونٽنگ ۽ فنانس ۾ بيچلر جي ڊگري ۽ بزنس ايڊمنسٽريشن ۾ ماسٽر جي ڊگري آهي. Hugh کي تدريس جو شوق آهي ۽ هڪ منفرد تدريس وارو طريقو ٺاهيو آهي جنهن جي پيروي ڪرڻ ۽ سمجهڻ آسان آهي. Excel جي هن جي ماهر ڄاڻ سڄي دنيا ۾ هزارين شاگردن ۽ پروفيسر جي مدد ڪئي آهي انهن جي صلاحيتن کي بهتر بنائڻ ۽ انهن جي ڪيريئر ۾ شاندار. هن جي بلاگ ذريعي، هگ پنهنجي ڄاڻ کي دنيا سان حصيداري ڪري ٿو، مفت ايڪسل سبق ۽ آن لائن ٽريننگ پيش ڪري ٿو ماڻهن ۽ ڪاروبار کي انهن جي مڪمل صلاحيت تائين پهچڻ ۾ مدد ڏيڻ.