तुम्ही एक्सेल VBA वापरून स्ट्रिंगमधील मजकूर बदलण्याचे मार्ग शोधत असाल, तर तुम्हाला हा लेख उपयुक्त वाटेल. मजकूराचा ठराविक भाग बदलल्याने मजकूर स्ट्रिंग पुन्हा टाईप करण्यात बराच वेळ वाचू शकतो. तर, या बदली कार्याबद्दल तपशील जाणून घेण्यासाठी मुख्य लेखात जाऊ या.

वर्कबुक डाउनलोड करा

<मध्ये मजकूर बदला 4> एक्सेल VBA वापरून स्ट्रिंगमधील मजकूर बदलण्याचे 5 मार्ग

येथे, आमच्याकडे खालील डेटासेट आहे ज्यात कर्मचाऱ्यांच्या ईमेल आयडीसह काही नोंदी आहेत. आमचे कार्य जुने डोमेन नावे नवीनसह पुनर्स्थित करणे आहे. खालील पद्धतींमध्ये, इच्छित मजकूर VBA कोडसह बदलण्यासाठी आम्ही या डेटासेटसह काही यादृच्छिक मजकूर स्ट्रिंगसह कार्य करू.

आम्ही वापरला आहे Microsoft Excel 365 आवृत्ती येथे, तुम्ही तुमच्या सोयीनुसार इतर कोणत्याही आवृत्त्या वापरू शकता.

पद्धत-01: रँडम स्ट्रिंगच्या n-व्या स्थानापासून सुरू होणारा मजकूर बदला

येथे, आम्ही वेगवेगळ्या प्रारंभिक पोझिशनसाठी यादृच्छिक मजकूर स्ट्रिंगमधील मजकूर बदलू.

स्टेप-01 :

➤ डेव्हलपर टॅबवर जा. >> कोड गट >> Visual Basic पर्याय.

नंतर, Visual Basic Editor उघडेल.

➤ घाला टॅब >> मॉड्युल पर्याय.

त्यानंतर, एक मॉड्युल तयार होईल.

स्टेप-02 :

➤ खालील लिहाcode

6084

येथे, आम्ही full_txt_str आणि updated_str स्ट्रिंग म्हणून घोषित केले आहे आणि नंतर full_txt_str यादृच्छिक मजकुरासाठी नियुक्त केले आहे. string- “शंभर कार पन्नास कार दहा कार” . नंतर VBA REPLACE फंक्शन चा वापर कार्स या रँडम स्ट्रिंगचा भाग सायकल<10 सह बदलण्यासाठी केला जातो आणि 1 येथे या स्ट्रिंगच्या 1 स्थानावरून बदलणे सुरू करण्यासाठी वापरले जाते. शेवटी, आम्ही ही नवीन मजकूर स्ट्रिंग updated_str ला नियुक्त केली आहे आणि संदेश बॉक्ससह ( MsgBox ) आम्हाला परिणाम दिसेल.

➤ F5 दाबा.

नंतर संदेश बॉक्स बदललेल्या मजकुरासह नवीन मजकूर स्ट्रिंगसह दिसेल सायकल .

➤ कार च्या दुस-या प्रसंगातून बदलण्याची प्रक्रिया करण्यासाठी खालील कोड वापरा.

4317

येथे, आम्ही सुरुवातीची स्थिती 14 म्हणून वापरली आहे कारण आम्हाला शंभर कार नंतर स्ट्रिंगचा भाग हवा आहे आणि <1 बदलायचा आहे. कार येथे.

➤ कोड रनिंग केल्यानंतर, आमच्याकडे खालील मेसेज बॉक्स असेल मजकूर स्ट्रिंग मजकूरापासून सुरू होणारा पन्नास आणि सायकल च्या स्थितीत कार .

➤ या स्ट्रिंगचा फक्त शेवटचा भाग असल्याने आम्ही खालील कोड लागू करत आहोत.

8019

येथे आपण सुरुवातीची स्थिती 25 म्हणून वापरली आहे कारण आम्हाला स्ट्रिंगचा भाग पन्नास कार नंतर हवा आहे आणि कार ला सायकल <ने बदलायचा आहे. 10> येथे.

शेवटी, आमच्याकडे एक संदेश बॉक्स असेल ज्यामध्ये स्ट्रिंगचा इच्छित भाग ने बदलेल. सायकल .

अधिक वाचा: एक्सेल VBA: स्ट्रिंगमधील वर्ण स्थितीनुसार बदला (4 प्रभावी मार्ग)

पद्धत-02: एक्सेल व्हीबीए वापरून यादृच्छिक स्ट्रिंगच्या n-व्या घटनेसाठी मजकूर बदला

या विभागात, आम्ही मदतीने वेगवेगळ्या संख्येच्या घटनांसाठी यादृच्छिक स्ट्रिंगमधील मजकूर बदलू. VBA कोड.

चरण :

➤ अनुसरण करा पद्धत-1<पैकी चरण-01 चे 2>.

➤ खालील कोड टाइप करा.

6220

येथे, आम्ही full_txt_str आणि updated_str स्ट्रिंग म्हणून घोषित केले आहे. आणि नंतर full_txt_str यादृच्छिक मजकूर स्ट्रिंगला नियुक्त केले- “शंभर कार पन्नास कार दहा कार” . त्यानंतर, REPLACE फंक्शन या यादृच्छिक स्ट्रिंगचा गाड्या भाग सायकल <सह बदलण्यासाठी वापरला जातो. 9>, 1 येथे या स्ट्रिंगच्या 1 स्थानावरून बदली सुरू करण्यासाठी वापरले जाते आणि अंतिम 1 आहे घटनांची संख्या मोजण्यासाठी. मोजणी क्रमांक म्हणून 1 वापरून आम्ही फक्त पहिल्या कार बदलण्याची व्याख्या करत आहोत. शेवटी, आम्ही ही नवीन मजकूर स्ट्रिंग updated_str ला नियुक्त केली आहे आणिसंदेश बॉक्स ( MsgBox ) आपण परिणाम पाहू.

➤ F5 दाबा.

नंतर, संदेश बॉक्स नवीन मजकुरासह दिसेल कार च्या प्रथम स्थानावर सायकली 2>केवळ.

➤ कार च्या पहिल्या दोन घटना बदलण्यासाठी सायकल <10 खालील कोड वापरा.

6498

येथे, 2 मोजणी क्रमांक म्हणून वापरला जातो कार चे पहिले दोन उदाहरण बदलण्यासाठी सायकल सह.

कोड चालवल्यानंतर, तुम्हाला पहिल्या दोन मजकूरांची जागा मिळेल कार सायकल सह.

➤ सर्व उदाहरणे बदलण्यासाठी खालील कोड लागू करा मजकूराचा कार .

7952

येथे, REPLACE फंक्शन चा शेवटचा वितर्क 3 जे आहे मजकूर स्ट्रिंगमध्‍ये गाड्या सायकल सह बदलणारी मोजणी संख्या.

➤ F5 दाबा.

नंतर, आम्ही करू स्ट्रिंगमध्ये सायकल

बदललेल्या मजकुरासह खालील संदेश बॉक्स आहे. तत्सम वाचन

• एक्सेलमध्ये कॅरेज रिटर्नसह मजकूर कसा बदलायचा (4 गुळगुळीत दृष्टीकोन)
• एक्सेल व्हीबीए: कसे शोधावे आणि वर्ड डॉक्युमेंटमधील मजकूर बदला
• एक्सेलमधील विशिष्ट वर्णानंतर मजकूर कसा बदलायचा (3 पद्धती)
• एचा मजकूर बदलाएक्सेलमधील स्थितीवर आधारित सेल (5 सोप्या पद्धती)

पद्धत-03: यादृच्छिक स्ट्रिंगमधील मजकूर इनपुटबॉक्ससह बदला

येथे, आपण काही मजकूर बदलू. मजकूरासह एक यादृच्छिक स्ट्रिंग जी VBA InputBox फंक्शन च्या मदतीने वापरकर्त्याद्वारे परिभाषित केली जाईल.

चरण :<3

➤ फॉलो करा पद्धत-01 चे पद्धत-1 .

➤ खालील कोड टाइप करा.

6047

येथे, आम्ही घोषित केले आहे. full_txt_str , new_txt , आणि updated_str स्ट्रिंग म्हणून आणि नंतर full_txt_str यादृच्छिक मजकूर स्ट्रिंगला नियुक्त केले- “शंभर कार पन्नास कार दहा कार” . यादृच्छिक स्ट्रिंगमध्ये कार्स सह बदलण्यासाठी मजकूर म्हणून वापरकर्ता-परिभाषित इनपुट मिळविण्यासाठी, आम्ही इनपुटबॉक्स फंक्शन वापरले आणि नंतर हे मूल्य नियुक्त केले. new_txt ला. नंतर REPLACE फंक्शन या यादृच्छिक स्ट्रिंगचा new_txt सह कार्स भाग बदलण्यासाठी वापरला जातो. शेवटी, आम्ही ही नवीन मजकूर स्ट्रिंग updated_str ला नियुक्त केली आहे आणि संदेश बॉक्ससह ( MsgBox ) आम्हाला परिणाम दिसेल.

➤ दाबा F5 .

त्यानंतर, एक इनपुट बॉक्स दिसेल जिथे तुम्हाला नवीन स्ट्रिंगमध्ये हवा असलेला मजकूर भाग टाकता येईल.

➤ सायकल किंवा तुम्हाला हवा असलेला कोणताही मजकूर टाइप करा आणि नंतर ठीक आहे दाबा.

33>

शेवटी, तुम्हाला नवीन मजकूर स्ट्रिंगमध्ये सायकल मध्ये नवीन मजकूर असलेले खालील परिणाम आहेत कारांची स्थिती .

अधिक वाचा: एक्सेल फॉर्म्युलामधील मजकूर कसा बदलायचा (7 सोपे मार्ग)

पद्धत-04: एक्सेल व्हीबीए

येथे, आम्ही gmail चा भाग बदलून स्ट्रिंगच्या श्रेणीमध्ये मजकूर बदलू. नवीन डोमेन स्तंभातील डोमेनसह ईमेल आयडी आणि नवीन ईमेल आयडी जमा करण्यासाठी आम्ही एक नवीन स्तंभ घातला आहे; अंतिम ईमेल आयडी .

चरण :

➤ अनुसरण करा चरण-01 पैकी पद्धत-1 .

➤ खालील कोड टाईप करा.

8695

येथे, आम्ही फॉर लूप पासून ऑपरेशन कार्यान्वित करण्यासाठी वापरले आहे. 1> पंक्ती 4 ते पंक्ती 13 . IF-THEN विधानाच्या मदतीने, आम्ही स्तंभ D च्या ईमेल आयडीमध्ये “gmail” <10 आहे का ते तपासले आहे. किंवा नाही, आणि हा निकष पूर्ण करण्यासाठी “gmail” ईमेल आयडीचा भाग स्तंभ E<च्या नवीन डोमेनसह बदलला जाईल. 10> स्तंभ F मध्ये नवीन आयडी तयार करण्यासाठी. अन्यथा तुमच्याकडे स्तंभ F च्या संबंधित सेलमध्ये रिक्त असेल.

➤ दाबा F5 .

तर, तुमच्याकडे अंतिम ईमेल आयडी स्तंभात नवीन ईमेल आयडी असतील.

अधिक वाचा: कॉलममधील मजकूर शोधण्यासाठी आणि बदलण्यासाठी Excel VBA  (2 उदाहरणे)

पद्धत-05: मजकूर शोधण्यासाठी वापरकर्ता इनपुटसह स्ट्रिंगच्या श्रेणीतील मजकूर बदला

तुम्ही बदलू शकता सह खालील ईमेल आयडीनवीन डोमेन आणि मागील आयडीमध्ये काय बदलायचे ते घोषित करा या पद्धतीचे अनुसरण करून वापरकर्ता इनपुट वापरला जाऊ शकतो.

चरण :

➤ अनुसरण करा पद्धत-01 चे पद्धत-1 .

➤ खालील कोड टाइप करा.

1677

येथे, आम्ही परिभाषित केले आहे. partial_text स्ट्रिंग म्हणून आणि नंतर वापरकर्त्याद्वारे इनपुट बॉक्स द्वारे दिलेल्या स्ट्रिंगला नियुक्त केले.

त्यानंतर, आम्ही पंक्ती 4 पासून पंक्ती 13 पर्यंत ऑपरेशन कार्यान्वित करण्यासाठी फॉर लूप वापरला आणि वापरला. IF-THEN विधान, आम्ही तपासले की स्तंभ D च्या ईमेल आयडीमध्ये “gmail” आहे किंवा नाही नाही आणि हा निकष पूर्ण करण्यासाठी “gmail” इमेल आयडीचा भाग तयार करण्यासाठी स्तंभ E च्या नवीन डोमेनसह बदलला जाईल. स्तंभ F मधील नवीन आयडी. अन्यथा तुमच्याकडे स्तंभ F च्या संबंधित सेलमध्ये रिक्त असेल.

➤ दाबा F5 .

त्यानंतर, तुमच्याकडे एक इनपुट बॉक्स असेल जिथे तुम्हाला ईमेल आयडीच्या श्रेणीमध्ये शोधायचा असलेला मजकूर टाइप करावा लागेल (येथे आमच्याकडे आहे gmail ) प्रविष्ट केले आणि नंतर ठीक आहे दाबा.

शेवटी, आम्ही आमचे अपडेट केलेले ईमेल आयडी फायनलमध्ये आणत आहोत. ईमेल आयडी स्तंभ.

अधिक वाचा: एक्सेल VBA (मॅक्रो आणि वापरकर्ता फॉर्म) सह श्रेणीतील मजकूर शोधा आणि बदला

सराव विभाग

याद्वारे सराव करण्यासाठीआम्ही स्वतः सराव नावाच्या शीटमध्ये खाली दिलेला सराव विभाग दिला आहे. कृपया ते स्वतः करा.

निष्कर्ष

या लेखात, आम्ही एक्सेल VBA वापरून स्ट्रिंगमधील मजकूर बदलण्याचे मार्ग समाविष्ट करण्याचा प्रयत्न केला आहे. . तुम्हाला ते उपयुक्त वाटेल अशी आशा आहे. तुमच्याकडे काही सूचना किंवा प्रश्न असल्यास, त्या टिप्पणी विभागात मोकळ्या मनाने शेअर करा.