فہرست کا خانہ
اگر آپ ایکسل VBA کا استعمال کرتے ہوئے اسٹرنگ میں متن کو تبدیل کرنے کے طریقے تلاش کر رہے ہیں، تو آپ کو یہ مضمون مفید معلوم ہوگا۔ متن کے مخصوص حصے کو تبدیل کرنے سے ٹیکسٹ سٹرنگز کو دوبارہ ٹائپ کرنے میں کافی وقت بچ سکتا ہے۔ تو، آئیے اس متبادل کام کے بارے میں تفصیلات جاننے کے لیے مرکزی مضمون میں جائیں۔
ورک بک ڈاؤن لوڈ کریں
String.xlsm<میں متن کو تبدیل کریں۔ 4> ایکسل VBA کا استعمال کرتے ہوئے اسٹرنگ میں متن کو تبدیل کرنے کے 5 طریقے
یہاں، ہمارے پاس درج ذیل ڈیٹا سیٹ ہے جس میں ملازمین کے کچھ ریکارڈ ان کے ای میل آئی ڈی کے ساتھ ہیں۔ ہمارا کام پرانے ڈومین ناموں کو نئے ناموں سے بدلنا ہے۔ درج ذیل طریقوں میں، ہم اس ڈیٹاسیٹ کے ساتھ کچھ بے ترتیب ٹیکسٹ سٹرنگز کے ساتھ کام کریں گے تاکہ مطلوبہ ٹیکسٹ کو VBA کوڈز سے تبدیل کیا جا سکے۔
ہم نے استعمال کیا ہے مائیکروسافٹ ایکسل 365 ورژن یہاں، آپ اپنی سہولت کے مطابق کوئی بھی دوسرا ورژن استعمال کرسکتے ہیں۔
طریقہ-01: رینڈم سٹرنگ کی n-ویں پوزیشن سے شروع ہونے والے متن کو تبدیل کریں
یہاں، ہم مختلف ابتدائی پوزیشنوں کے لیے متن کو بے ترتیب ٹیکسٹ سٹرنگ میں بدل دیں گے۔
Step-01 :
➤ Developer Tab پر جائیں >> کوڈ گروپ >> بصری بنیادی آپشن۔
پھر، بصری بنیادی ایڈیٹر 2
اس کے بعد، ایک ماڈیول بنایا جائے گا۔
15>
مرحلہ-02 :
➤ درج ذیل لکھیں۔کوڈ
3938
یہاں، ہم نے full_txt_str اور updated_str کو String کے طور پر اعلان کیا ہے اور پھر full_txt_str کو بے ترتیب متن میں تفویض کیا ہے۔ string- "سو کاریں پچاس کاریں دس کاریں" ۔ پھر VBA REPLACE فنکشن کا استعمال کاریں اس بے ترتیب سٹرنگ کے حصے کو بائیکلیں<10 سے بدلنے کے لیے کیا جاتا ہے۔ اور 1 یہاں اس سٹرنگ کی پوزیشن 1 سے متبادل شروع کرنے کے لیے استعمال کیا جاتا ہے۔ آخر میں، ہم نے اس نئی ٹیکسٹ اسٹرنگ کو updated_str کو تفویض کیا ہے اور ایک میسج باکس ( MsgBox ) کے ساتھ ہم نتیجہ دیکھیں گے۔
➤ دبائیں F5 ۔
پھر ایک میسج باکس نئے ٹیکسٹ سٹرنگ کے ساتھ تبدیل شدہ ٹیکسٹ بائیکلیں <کے ساتھ ظاہر ہوگا۔ 2>.
➤ کاریں کی دوسری مثال سے تبدیلی کا عمل کرنے کے لیے درج ذیل کوڈ کا استعمال کریں۔
9005<1 کاریں یہاں۔
➤ کوڈ کو چلانے کے بعد، ہمارے پاس درج ذیل میسج باکس ہوگا۔ کے ساتھ ٹیکسٹ سٹرنگ ٹیکسٹ سے شروع ہوتا ہے پچاس اور بائیسکل کے ساتھ <کی پوزیشن میں 1> کاریں ۔
➤ اس سٹرنگ کا صرف آخری حصہ رکھنے کے لیے ہم درج ذیل کوڈ کو لاگو کر رہے ہیں۔
1445
یہاں، ہم نے شروعاتی پوزیشن کو بطور 25 استعمال کیا ہے۔ کیونکہ ہم پچاس کاروں کے بعد سٹرنگ کا حصہ رکھنا چاہتے ہیں اور کاریں کو بائیسکل <سے تبدیل کرنا چاہتے ہیں۔ 10> یہاں۔
آخر میں، ہمارے پاس ایک میسج باکس ہوگا جس میں سٹرنگ کا ہمارا مطلوبہ حصہ سے تبدیل ہوگا۔ سائیکلیں ۔
مزید پڑھیں: ایکسل VBA: سٹرنگ میں کریکٹر کو پوزیشن کے لحاظ سے تبدیل کریں (4 مؤثر طریقے)
طریقہ-02: ایکسل VBA کا استعمال کرتے ہوئے رینڈم سٹرنگ کے n-ویں وقوع کے لیے متن کو تبدیل کریں
اس سیکشن میں، ہم مدد سے مختلف تعداد کے واقعات کے لیے بے ترتیب سٹرنگ میں متن بدل دیں گے۔ VBA کوڈ کا۔
مرحلہ :
➤ فالو کریں مرحلہ-01 کا طریقہ 1 ۔
➤ درج ذیل کوڈ کو ٹائپ کریں۔
5280
یہاں، ہم نے full_txt_str اور updated_str کو String کے طور پر اعلان کیا ہے۔ اور پھر full_txt_str ایک بے ترتیب ٹیکسٹ سٹرنگ کو تفویض کیا گیا- "سو کاریں پچاس کاریں دس کاریں" ۔ اس کے بعد، REPLACE فنکشن کا استعمال کاریں اس بے ترتیب سٹرنگ کے حصے کو بائیسکلز <سے بدلنے کے لیے کیا جاتا ہے۔ 9>، 1 یہاں اس سٹرنگ کی پوزیشن 1 سے متبادل شروع کرنے کے لیے استعمال کیا جاتا ہے، اور حتمی 1 ہے واقعات کی تعداد گننے کے لیے۔ 1 کو گنتی نمبر کے طور پر استعمال کرکے ہم صرف پہلی کاروں کی تبدیلی کی وضاحت کر رہے ہیں۔ آخر میں، ہم نے اس نئی ٹیکسٹ سٹرنگ کو updated_str کو تفویض کیا ہے اور اس کے ساتھمیسج باکس ( MsgBox ) ہم نتیجہ دیکھیں گے۔
➤ دبائیں F5 ۔
بعد میں، ایک پیغام خانہ نئے متن کے ساتھ ظاہر ہوگا کاریں کی پہلی پوزیشن میں سائیکلیں صرف. مندرجہ ذیل کوڈ استعمال کریں۔
2856
یہاں، 2 کو شماری نمبر کے طور پر استعمال کیا جاتا ہے تاکہ کاریں <2 بائیسکلوں کے ساتھ۔
کوڈ کو چلانے کے بعد، آپ کو پہلے دو متن <کا متبادل حاصل ہوگا۔ 9>کاریں بائیسکل کے ساتھ۔
➤ تمام مثالوں کو تبدیل کرنے کے لیے درج ذیل کوڈ کا اطلاق کریں۔ متن کا کاریں ۔
7608
یہاں، REPLACE فنکشن کی آخری دلیل ہے 3 جو کہ گنتی کی تعداد جو متن کے اسٹرنگ میں کاروں کے ساتھ بائیسکل کے متبادل کی نشاندہی کرتی ہے۔
➤ دبائیں F5 ۔
اس کے بعد، ہم کریں گے۔ اسٹرنگ میں درج ذیل میسج باکس کو تبدیل شدہ متن کے ساتھ بائیسیکلز
اسی طرح کی ریڈنگز
- ایکسل میں ٹیکسٹ کو کیریج ریٹرن کے ساتھ کیسے بدلیں (4 ہموار نقطہ نظر)
- ایکسل VBA: کیسے تلاش کریں اور ورڈ دستاویز میں متن کو تبدیل کریں
- ایکسل میں مخصوص کریکٹر کے بعد متن کو کیسے تبدیل کریں (3 طریقے)
- ایک کے متن کو تبدیل کریںایکسل میں حالت پر مبنی سیل (5 آسان طریقے)
طریقہ -03: ان پٹ باکس کے ساتھ رینڈم سٹرنگ میں متن کو تبدیل کریں
یہاں، ہم ایک مخصوص متن کو تبدیل کریں گے۔ متن کے ساتھ ایک بے ترتیب سٹرنگ جس کی وضاحت صارف VBA InputBox فنکشن کی مدد سے کرے گا۔
Steps :<3
➤ فالو کریں مرحلہ-01 کا طریقہ -1 ۔
➤ درج ذیل کوڈ کو ٹائپ کریں۔
1782
یہاں، ہم نے اعلان کیا ہے۔ full_txt_str ، new_txt ، اور updated_str بطور سٹرنگ اور پھر تفویض کیا گیا full_txt_str ایک بے ترتیب ٹیکسٹ سٹرنگ- "سو کاریں پچاس کاریں دس کاریں" ۔ بے ترتیب سٹرنگ میں کاریں کے ساتھ بدلے جانے والے متن کے طور پر صارف کی وضاحت کردہ ان پٹ حاصل کرنے کے لیے، ہم نے ان پٹ باکس فنکشن استعمال کیا ہے اور پھر اس قدر کو تفویض کیا ہے۔ new_txt میں۔ پھر REPLACE فنکشن کا استعمال Cars اس رینڈم سٹرنگ کے حصے کو new_txt سے بدلنے کے لیے کیا جاتا ہے۔ آخر میں، ہم نے اس نئی ٹیکسٹ سٹرنگ کو updated_str کو تفویض کیا ہے اور ایک میسج باکس ( MsgBox ) کے ساتھ ہم نتیجہ دیکھیں گے۔
➤ دبائیں F5 ۔
اس کے بعد، ایک ان پٹ باکس ظاہر ہوگا جہاں آپ کوئی بھی ٹیکسٹ پارٹ داخل کرسکتے ہیں جسے آپ نئی سٹرنگ میں رکھنا چاہتے ہیں۔
➤ ٹائپ کریں سائیکلیں یا کوئی دوسرا متن جو آپ چاہتے ہیں اور پھر دبائیں ٹھیک ہے ۔
33>
آخر میں، آپ نئی ٹیکسٹ سٹرنگ کے ساتھ درج ذیل نتیجہ حاصل کریں جس میں نیا متن بائیکلیں کاروں کی پوزیشن۔
مزید پڑھیں: ایکسل فارمولہ میں متن کو کیسے بدلا جائے (7 آسان طریقے)
طریقہ-04: ایکسل VBA کے ساتھ سٹرنگز کی ایک رینج میں متن کو تبدیل کریں
یہاں، ہم gmail کا حصہ بدلیں گے۔ نیا ڈومین کالم میں ڈومینز کے ساتھ ای میل آئی ڈیز، اور نئی ای میل آئی ڈیز کو جمع کرنے کے لیے ہم نے ایک نیا کالم داخل کیا ہے۔ 1 کا طریقہ-1 ۔
➤ درج ذیل کوڈ کو ٹائپ کریں۔
3385
یہاں، ہم نے فور لوپ کو <سے آپریشن کرنے کے لیے استعمال کیا ہے۔ 1> قطار 4 سے قطار 13 ۔ IF-THEN اسٹیٹمنٹ کی مدد سے، ہم نے چیک کیا ہے کہ آیا کالم D کی ای میل آئی ڈی "gmail" <10 پر مشتمل ہے۔ یا نہیں، اور اس معیار کو پورا کرنے کے لیے "gmail" ای میل آئی ڈیز کا حصہ کالم E<کے نئے ڈومینز سے بدل دیا جائے گا۔ 10> کالم F میں نئی آئی ڈی بنانے کے لیے۔ بصورت دیگر آپ کے پاس کالم F کے متعلقہ سیلز میں خالی جگہ ہوگی۔
➤ دبائیں F5 .
پھر، آپ کے پاس حتمی ای میل آئی ڈی کالم میں نئی ای میل آئی ڈیز ہوں گی۔
مزید پڑھیں: کالم میں متن تلاش کرنے اور تبدیل کرنے کے لیے ایکسل VBA (2 مثالیں)
طریقہ-05: متن کو تلاش کرنے کے لیے صارف کے ان پٹ کے ساتھ سٹرنگز کی ایک رینج میں متن کو تبدیل کریں
آپ مندرجہ ذیل ای میل آئی ڈی کے ساتھنئے ڈومینز اور اعلان کریں کہ پچھلی آئی ڈیز میں کیا تبدیل کرنا ہے اس طریقہ پر عمل کرکے صارف کا ان پٹ استعمال کیا جا سکتا ہے۔
اقدامات :
➤ فالو کریں مرحلہ-01 کا طریقہ-1 ۔
➤ درج ذیل کوڈ کو ٹائپ کریں۔
2882
یہاں، ہم نے کی وضاحت کی ہے۔ partial_text بطور String اور پھر اسے ایک سٹرنگ کے لیے تفویض کیا جو کہ صارف کی جانب سے ان پٹ باکس کے ذریعے دیا جائے گا۔
اس کے بعد، ہم نے فور لوپ کا استعمال قطار 4 سے رو 13 تک آپریشن کو انجام دینے کے لیے کیا، اور استعمال کیا۔ IF-THEN بیان، ہم نے چیک کیا کہ آیا کالم D کی ای میل آئی ڈی میں "gmail" یا نہیں اور اس معیار کو پورا کرنے کے لیے "gmail" ای میل آئی ڈیز کے حصے کو کالم E کے نئے ڈومینز سے بدل دیا جائے گا۔ کالم F میں نئی آئی ڈیز۔ بصورت دیگر آپ کے پاس کالم F کے متعلقہ سیلز میں خالی جگہ ہوگی۔
➤ دبائیں F5 .
اس کے بعد، آپ کے پاس ایک ان پٹ باکس ہوگا جہاں آپ کو وہ متن ٹائپ کرنا ہوگا جسے آپ ای میل آئی ڈیز کی حد میں تلاش کرنا چاہتے ہیں (یہاں ہمارے پاس ہے gmail ) درج کیا اور پھر ٹھیک ہے دبائیں۔
آخر میں، ہمارے پاس اپنی اپ ڈیٹ کردہ ای میل آئی ڈیز فائنل میں ہیں۔ ای میل آئی ڈی کالم۔
مزید پڑھیں: ایکسل VBA (میکرو اور یوزر فارم) کے ساتھ ایک رینج میں متن تلاش کریں اور تبدیل کریں
پریکٹس سیکشن
بذریعہ پریکٹس کرنے کے لیےخود ہم نے ایک مشق سیکشن فراہم کیا ہے جیسا کہ ذیل میں پریکٹس نامی شیٹ میں ہے۔ براہ کرم اسے خود کریں۔
نتیجہ
اس مضمون میں، ہم نے ایکسل VBA کا استعمال کرتے ہوئے سٹرنگ میں متن کو تبدیل کرنے کے طریقوں کا احاطہ کرنے کی کوشش کی ہے۔ ۔ امید ہے کہ آپ کو یہ مفید لگے گا۔ اگر آپ کے پاس کوئی مشورے یا سوالات ہیں تو بلا جھجھک ان کا اشتراک تبصرے کے سیکشن میں کریں۔
