कभी-कभी हमें किसी कारण से अपने डेटासेट को संशोधित करने की आवश्यकता होती है। और जब हम कई कार्यपत्रकों और कार्यपुस्तिकाओं के साथ काम कर रहे होते हैं तो काम पूरा करना वास्तव में कठिन होता है। लेकिन अगर आप एक्सेल के ढूंढें और बदलें . का सही उपयोग जानते हैं टूल और VBA कोड तो यह कठिन कार्य काफी आसान हो जाता है। इस लेख में, हम आपको दिखाएंगे कि एकाधिक शीट और फ़ाइलों में मानों को कैसे ढूंढें और बदलें एक्सेल में ढूंढें और बदलें . के साथ टूल और VBA मैक्रो ।
कार्यपुस्तिका डाउनलोड करें
आप यहां से निःशुल्क अभ्यास एक्सेल वर्कबुक डाउनलोड कर सकते हैं।
एक्सेल में एकाधिक कार्यपत्रकों और कार्यपुस्तिकाओं में मान ढूँढ़ने और बदलने की 3 विधियाँ
आगामी अनुभागों में, आप सीखेंगे कि अनेक एक्सेल शीट और फाइलों में कुछ मूल्यों को कैसे ढूंढें और बदलें ढूंढें और बदलें . के साथ विशेषता और VBA . के साथ एक्सेल में मैक्रो।
1. Excel फ़ाइल में एकाधिक कार्यपत्रकों में मान ढूँढ़ें और बदलें
आप मौजूदा कार्यपुस्तिका के सभी कार्यपत्रकों से एक निश्चित मान प्राप्त कर सकते हैं और उन सभी को एक साथ किसी भी मान से बदल सकते हैं जो आपको चाहिये। आइए आपको दिखाते हैं कि आप एक्सेल के ढूंढें और बदलें . के साथ ऐसा कैसे कर सकते हैं उपकरण।
निम्न छवि में, आप देख सकते हैं कि हमारे पास एक . नाम की एक एक्सेल शीट है ।
उसी कार्यपुस्तिका में, हमारे पास दो . नाम की एक और शीट है ।
अब हम यहां जो करने जा रहे हैं, वह यह है कि हम एक विशिष्ट शब्द ढूंढेंगे और इसे दूसरे शब्द के साथ ढूँढें और बदलें से बदल देंगे। एक्सेल में फीचर। हमारे मामले में, हम “एम्ब्रोस” . शब्द को बदल देंगे “मॉक्सली” . के साथ ।
चरण:
- होम से टैब में, ढूंढें और चुनें -> बदलें चुनें …
- उसके बाद, एक ढूंढें और बदलें पॉप-अप बॉक्स दिखाई देगा। विकल्प>> . पर क्लिक करें (नीचे चित्र में दिखाया गया है)।
- उसके बाद, पॉप-अप बॉक्स में नए विकल्प दिखाई देंगे। वह शब्द लिखें जिसे आप खोजना चाहते हैं (हमारे मामले में, यह “एम्ब्रोस” . है ) क्या ढूंढें . में अनुभाग।
- फिर, वह शब्द लिखें जिसे आप बदलना चाहते हैं के साथ पिछला शब्द (शब्द “Moxley” . है हमारे मामले में) से बदलें . में अनुभाग।
- उसके बाद, अंदर . के बगल में ड्रॉप-डाउन सूची से , कार्यपुस्तिका . चुनें . यह दिए गए शब्द को उस कार्यपुस्तिका की सभी शीटों में ढूंढ लेगा और उन सभी को बदल देगा।
- अंत में, सभी को बदलें पर क्लिक करें ।
आपको एक पुष्टिकरण बॉक्स प्राप्त होगा होने वाले सभी प्रतिस्थापनों को बताते हुए। चूंकि हमारी कार्यपुस्तिका में केवल 2 कार्यपत्रक हैं, इसलिए हमारे मामले में केवल 2 प्रतिस्थापन हुए। यदि आपके पास अधिक शीट हैं, तो अधिक प्रतिस्थापन होंगे।
अब देखते हैं कि प्रतिस्थापन वास्तव में हुआ या नहीं!
उपरोक्त और निम्न दोनों छवियों पर विचार करें।
शब्द "एम्ब्रोस" हमारी दोनों शीट से अब “Moxley” . शब्द से बदल दिया गया है ।
और पढ़ें:एक्सेल में VBA (3 उदाहरण) के साथ कई मानों को कैसे खोजें और बदलें
2. एकाधिक कार्यपुस्तिकाओं की एकाधिक शीट में मान ढूंढें और बदलें
क्या आप जानते हैं कि ढूंढें और बदलें . का प्रदर्शन करने के बाद ई निश्चित कार्यपत्रक के लिए संचालन, ढूंढें और बदलें पॉप-अप बॉक्स तब तक बंद नहीं होगा जब तक आप इसे मैन्युअल रूप से बंद नहीं करते? इसलिए, आप इस सुविधा का लाभ तब उठा सकते हैं जब आपको कई कार्यपुस्तिकाओं में मानों को बदलने की आवश्यकता हो।
निम्नलिखित छवियों को देखें। हमने दो एक्सेल वर्कबुक खोली हैं। एक का नाम है मान ढूंढें और बदलें (नीचे चित्र देखें)।
एक अन्य का नाम है एकाधिक कॉलम स्थानांतरित करें (नीचे चित्र में दिखाया गया है)।
अब, उपरोक्त अनुभाग में चर्चा की गई एक विशिष्ट कार्यपत्रक से मूल्य बदलने के बाद, आप देखेंगे कि खोजें और बदलें पॉप-अप बॉक्स अभी भी वहां है ।
- वहां से, आपको बस इतना करना है, बंद करें बटन क्लिक करने के बजाय , बस अगली कार्यपुस्तिका पर होवर करें और सभी बदलें दबाएं . यह उन मानों को ढूंढेगा जो आप चाहते हैं और उन्हें उस मूल्य से बदल दें जो आप उस कार्यपुस्तिका के सभी कार्यपत्रकों से भी प्रदान करते हैं।
आप जितनी चाहें उतनी कार्यपुस्तिकाओं पर यह कार्रवाई कर सकते हैं।
और पढ़ें: एक्सेल में फॉर्मूला का उपयोग करके कैसे खोजें और बदलें (4 उदाहरण)
समान रीडिंग:
- एक्सेल फॉर्मूला में टेक्स्ट कैसे बदलें (7 आसान तरीके)
- एक्सेल में तारांकन चिह्न (*) वर्ण कैसे खोजें और बदलें
- एक्सेल वीबीए (मैक्रो और यूजरफॉर्म) के साथ रेंज में टेक्स्ट ढूंढें और बदलें
- एक्सेल कॉलम में कैसे खोजें और बदलें (6 तरीके)
- Excel में चयन के भीतर कैसे खोजें और बदलें (7 तरीके)
3. एक्सेल में ओपन वर्कबुक में वैल्यू खोजने और बदलने के लिए वीबीए एम्बेड करें
आप पिछले अनुभागों में चर्चा किए गए सभी काम केवल एक VBA . के साथ कर सकते हैं कोड। यदि आप एक उन्नत एक्सेल उपयोगकर्ता हैं, तो यह अनुभाग आपके लिए है। VBA लागू किया जा रहा है एक्सेल में किसी भी ऑपरेशन को चलाने के लिए सबसे प्रभावी, तेज और सबसे सुरक्षित तरीका है। आप किसी कार्यपुस्तिका के सभी कार्यपत्रकों से मान ढूंढ़ सकते हैं और बदल सकते हैं एक्सेल में। आइए देखें कि VBA . के साथ ऐसा कैसे करें मैक्रो।
चरण:
- शुरुआत में, Alt + F11 दबाएं अपने कीबोर्ड पर या टैब पर जाएं डेवलपर -> विजुअल बेसिक विजुअल बेसिक संपादक खोलने के लिए ।
- अगला, पॉप-अप कोड विंडो में, मेनू बार से, सम्मिलित करें -> मॉड्यूल क्लिक करें ।
- फिर, प्रतिलिपि करें निम्नलिखित कोड और चिपकाएं इसे कोड विंडो में।
Sub MultipleFindAndReplace()
Dim iSheet As Worksheet
Dim OldValue As Variant
Dim NewValue As Variant
Dim i As Long
OldValue = Array("John", "Roman", "Dean", "Seth", "Finn")
NewValue = Array("Ben", "Alex", "Joe", "Chris", "Josh")
For i = LBound(OldValue) To UBound(OldValue)
For Each iSheet In ActiveWorkbook.Worksheets
iSheet.Cells.Replace What:=OldValue(i), Replacement:=NewValue(i), LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Next iSheet
Next i
End Sub
आपका कोड अब चलने के लिए तैयार है।
कोड का यह टुकड़ा मानों की सरणी को बदल देगा "जॉन, रोमन, डीन, सेठ, फिन" मानों के साथ “बेन, एलेक्स, जो, क्रिस, जोश” ।
- अब, F5 दबाएं अपने कीबोर्ड पर या मेनू बार से चलाएं -> उप/उपयोगकर्ता प्रपत्र चलाएं . चुनें . आप बस छोटा रन आइकन . पर भी क्लिक कर सकते हैं उप-मेनू बार में मैक्रो चलाने के लिए।
कोड निष्पादन के बाद, परिणाम देखने के लिए नीचे दी गई छवि को देखें।
सभी मान (“जॉन, रोमन, डीन, सेठ, फिन” ) जिसे आपने मानों से बदलने के लिए अपने कोड में दर्ज किया था (“बेन, एलेक्स, जो, क्रिस, जोश” ) अब सफलतापूर्वक बदल दिए गए हैं।
आप एकाधिक कार्यपुस्तिकाओं में एकाधिक कार्यपत्रकों से अनेक मान ढूंढने और बदलने के लिए भी इस कोड को निष्पादित कर सकते हैं ।
- एक कार्यपुस्तिका पर मैक्रो चलाने के बाद, अब बस दूसरे पर होवर करें . फिर वहां से डेवलपर -> मैक्रोज़ . पर जाएं ।
- एक मैक्रो पॉप-अप बॉक्स दिखाई देगा। वहां मैक्रो नाम चुनें और चलाएँ क्लिक करें ।
आप देखेंगे कि वही परिणाम उस कार्यपुस्तिका पर लागू होगा जिसे आपने बाद में खोला था। आपके द्वारा कोड में दर्ज किए गए मानों को ढूंढें और बदलें, उन शब्दों को खोजने और उन्हें बदलने में अपना काम सफलतापूर्वक करेंगे।
VBA कोड स्पष्टीकरण
Dim iSheet As Worksheet
Dim OldValue As Variant
Dim NewValue As Variant
Dim i As Long
चरों को परिभाषित करना।
OldValue = Array("John", "Roman", "Dean", "Seth", "Finn")
NewValue = Array("Ben", "Alex", "Joe", "Chris", "Josh")
OldValue . में खोजने के लिए मान सेट करें वैरिएबल और मानों को NewValue . में बदलने के लिए सेट करें चर।
For i = LBound(OldValue) To UBound(OldValue)
For Each iSheet In ActiveWorkbook.Worksheets
iSheet.Cells.Replace What:=OldValue(i), Replacement:=NewValue(i), LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Next iSheet
Next i
कोड का यह टुकड़ा पहले ऐरे सूचियों में प्रत्येक आइटम के माध्यम से लूप करेगा। फिर ActiveWorkbook में प्रत्येक कार्यपत्रक के माध्यम से लूप करें। स्कैन करने के बाद, यह OldValue . को बदल देगा NewValue . के साथ जब यह मैच पाता है। एक शीट में पुनरावृत्ति के बाद, यह फिर अगली शीट में चला जाएगा और लूप को फिर से निष्पादित करना शुरू कर देगा।
और पढ़ें: Excel में एकाधिक मान ढूंढें और बदलें (6 त्वरित तरीके)
निष्कर्ष
निष्कर्ष निकालने के लिए, इस लेख ने आपको एकाधिक शीट और फ़ाइलों में मानों को खोजने और बदलने के तरीके पर अलग-अलग तरीके दिखाए हैं। एक्सेल में ढूंढें और बदलें . के साथ टूल और VBA मैक्रो . मुझे उम्मीद है कि यह लेख आपके लिए बहुत फायदेमंद रहा होगा। विषय के संबंध में कोई भी प्रश्न पूछने के लिए स्वतंत्र महसूस करें।
संबंधित लेख
- Excel में डेटा क्लीन-अप तकनीक:सेल में टेक्स्ट जोड़ना
- Excel में फ़ॉर्मूला से पहले टेक्स्ट कैसे जोड़ें (4 आसान तरीके)
- Excel में वाइल्डकार्ड का उपयोग करके मान ढूंढें और बदलें
- एक्सेल VBA में स्थानापन्न फ़ंक्शन का उपयोग कैसे करें (3 उदाहरण)
- Excel में विशेष वर्णों को कैसे बदलें (6 तरीके)