खोजें और बदलें समारोह VBA में
यदि आपकी एक्सेल जॉब में कुछ खोजने और उसे किसी चीज के साथ बदलने के लिए नियमित कार्य शामिल हैं, तो आपको किसी भी कीमत पर इस लेख की आवश्यकता है। क्योंकि इस लेख को पढ़ने के बाद, आप शायद इस VBA कोडिंग तकनीक को सीखकर अपना 80% समय बचा लेंगे। एक्सेल में खोजें और बदलें एक अक्सर इस्तेमाल किया जाने वाला उपकरण है, और हम इसे VBA के साथ भी लागू कर सकते हैं। हमारे पहले के लेख "VBA फाइंड" में, हमने आपको दिखाया है कि VBA में FIND विधि का उपयोग कैसे करें। इस लेख में, हम आपको VBA "फाइंड एंड रिप्लेस" विधि का उपयोग करने का तरीका बताएंगे।
इस तकनीक को सीखने के लिए लेख का अनुसरण करें।
![](https://cdn.know-base.net/4243297/vba_find_and_replace_how_to_find_replace_words_in_excel_vba_.jpg.webp)
VBA सिंटैक्स को ढूंढें और बदलें
वीबीए में फाइंड एंड रिप्लेसमेंट विधि का उपयोग करने के लिए, हमें नीचे दिए गए चरणों का पालन करना होगा। सबसे पहले, हमने कोशिकाओं की श्रेणी का चयन किया है, इसलिए VBA में RANGE ऑब्जेक्ट का उपयोग करके कोशिकाओं की श्रेणी का उल्लेख करें।
![](https://cdn.know-base.net/4243297/vba_find_and_replace_how_to_find_replace_words_in_excel_vba__2.jpg.webp)
अब IntelliSense सूची देखने के लिए एक डॉट (।) डालें।
![](https://cdn.know-base.net/4243297/vba_find_and_replace_how_to_find_replace_words_in_excel_vba__3.jpg.webp)
सूची से बदलें विधि का चयन करें।
![](https://cdn.know-base.net/4243297/vba_find_and_replace_how_to_find_replace_words_in_excel_vba__4.jpg.webp)
हम रिप्लेसमेंट विधि की विशाल पैरामीटर सूची देख सकते हैं। अब हम नीचे प्रत्येक पैरामीटर स्पष्टीकरण देखेंगे।
- क्या: यह कुछ भी नहीं है लेकिन मूल्य को बदलने के लिए हमें क्या खोजने की आवश्यकता है।
- रिप्लेसमेंट: पाए गए मूल्य के साथ, नए मूल्य के साथ क्या होना चाहिए।
- लुक एट: यह उल्लेख करना है कि क्या हम पूरी सामग्री को देखना चाहते हैं या केवल सामग्री का हिस्सा है। हम यहां दो मापदंडों "xlWhole" और "xlPart" की आपूर्ति कर सकते हैं।
- खोज क्रम: यह खोज क्रम, या तो पंक्तियों या स्तंभों का उल्लेख करना है। हम यहां "xlByRows" और "xlByColumns" दो मापदंडों की आपूर्ति कर सकते हैं।
- मैच केस: जिस कंटेंट को हम खोज रहे हैं, वह केस सेंसिटिव है या नहीं। यदि मामला संवेदनशील तर्क TRUE है या फिर FALSE है।
- खोज प्रारूप: हम उस मूल्य के प्रारूपण द्वारा भी सामग्री खोज सकते हैं जिसकी हम तलाश कर रहे हैं।
- प्रारूप बदलें: हम एक प्रारूप को दूसरे प्रारूप के साथ भी बदल सकते हैं।
VBA के उदाहरण एक्सेल में खोजें और बदलें
नीचे एक्सेल VBA फाइंड एंड रिप्लेसमेंट विधि के कुछ उदाहरण दिए गए हैं।
उदाहरण # 1 - VBA शब्द खोजें और बदलें
ठीक है, चलिए VBA फाइंड एंड रिप्लेसमेंट मेथड को समझने के लिए निम्नलिखित उदाहरण देखें। निम्नलिखित आंकड़ों पर एक नज़र डालें।
![](https://cdn.know-base.net/4243297/vba_find_and_replace_how_to_find_replace_words_in_excel_vba__5.jpg.webp)
चरण 1: सबसे पहले, उन कोशिकाओं की श्रेणी का उल्लेख करें जिन्हें हम प्रतिस्थापित कर रहे हैं। इस उदाहरण में, रेंज A1 से B15 तक है, इसलिए कोड रेंज ("A1: B15") होगा।
कोड:
उप प्रतिस्थापन_ एक्सप्लोम 1 () रेंज ("A1: B15") एंड सब
![](https://cdn.know-base.net/4243297/vba_find_and_replace_how_to_find_replace_words_in_excel_vba__6.jpg.webp)
चरण 2: अब IntelliSense सूची देखने के लिए एक डॉट डालें।
![](https://cdn.know-base.net/4243297/vba_find_and_replace_how_to_find_replace_words_in_excel_vba__7.jpg.webp)
चरण 3: IntelliSense सूची से बदलें विधि का चयन करें।
![](https://cdn.know-base.net/4243297/vba_find_and_replace_how_to_find_replace_words_in_excel_vba__8.jpg.webp)
चरण 4: उल्लेख करें कि "सितंबर" क्या पैरामीटर है।
कोड:
रेंज ("A1: B15")। क्या बदलें: = "सितंबर"
![](https://cdn.know-base.net/4243297/vba_find_and_replace_how_to_find_replace_words_in_excel_vba__9.jpg.webp)
चरण 5: अगला, पैरामीटर के साथ बदलें हमारा नया मान होना चाहिए जिसे हम अर्थात्, "दिसंबर" से बदल सकते हैं।
कोड:
रेंज ("A1: D4")। क्या बदलें: = "सितंबर", रिप्लेसमेंट: = "दिसंबर"
![](https://cdn.know-base.net/4243297/vba_find_and_replace_how_to_find_replace_words_in_excel_vba__10.jpg.webp)
ठीक है, अब के रूप में, अन्य सभी मापदंडों की उपेक्षा करें। अब VBA के साथ प्रतिस्थापन विधि को देखने के लिए VBA कोड चलाएं।
![](https://cdn.know-base.net/4243297/vba_find_and_replace_how_to_find_replace_words_in_excel_vba_.gif)
इसलिए, इसने "दिसंबर" शब्द के साथ सभी सितंबर को बदल दिया है।
उदाहरण # 2 - केस सेंसिटिव रिप्लेसमेंट
VBA ढूँढें और बदलें विधि का अधिक उन्नत उदाहरण केस संवेदी प्रतिस्थापन विधि का उपयोग करेगा। इस उदाहरण के लिए, मैंने यह नमूना डेटा बनाया है, जैसा कि नीचे की छवि में दिखाया गया है।
![](https://cdn.know-base.net/4243297/vba_find_and_replace_how_to_find_replace_words_in_excel_vba__11.jpg.webp)
हमारे पास बड़े अक्षरों में दो सेल डेटा हैं, "हेलो।" जहां कभी भी हमारे पास एक राजधानी है "हेलो," इसे नए शब्द "Hiii" से बदल दिया जाना चाहिए।
हमेशा की तरह, कोड लिखें, उल्लेख करें कि क्या खोजना है और पहले क्या बदलना है।
कोड:
उप प्रतिस्थापन_ एक्सप्लोम 2 () रेंज ("A1: D4")। क्या बदलें: = "HELLO", प्रतिस्थापन: = "Hiii" अंत उप
![](https://cdn.know-base.net/4243297/vba_find_and_replace_how_to_find_replace_words_in_excel_vba__12.jpg.webp)
अब अगले तर्क के लिए, "मैच केस," स्थिति को TRUE के रूप में लिखें।
कोड:
श्रेणी ("A1: D4")। क्या बदलें: = "HELLO", प्रतिस्थापन: = "Hiii", MatchCase: = True
![](https://cdn.know-base.net/4243297/vba_find_and_replace_how_to_find_replace_words_in_excel_vba__13.jpg.webp)
अब कोड को रन करें। यह केवल "हीली" के साथ राजधानी "हेलो" को बदल देगा।
![](https://cdn.know-base.net/4243297/vba_find_and_replace_how_to_find_replace_words_in_excel_vba__2.gif)
कल्पना कीजिए कि आपने VBA में मैच केस तर्क लागू नहीं किया है, तो यह सभी "हैलो" को "Hiii" में बदल देगा।
![](https://cdn.know-base.net/4243297/vba_find_and_replace_how_to_find_replace_words_in_excel_vba__12.jpg.webp)
नोट: मैंने यहां मैच केस तर्क को हटा दिया है। डिफ़ॉल्ट रूप से, MATCH CASE तर्क मान FALSE है।
![](https://cdn.know-base.net/4243297/vba_find_and_replace_how_to_find_replace_words_in_excel_vba__14.jpg.webp)
जैसा कि हम उपरोक्त छवि में देख सकते हैं, इसने सभी "हैलो" शब्दों को "hiii" में बदल दिया है।
इसलिए, जब भी हम MATCH CASE मानदंड का उपयोग करना चाहते हैं, तो हमें तर्क को "TRUE" के रूप में लागू करना चाहिए और डिफ़ॉल्ट रूप से, यह तर्क मान "FALSE" है। इस तरह, हम कुछ खोजने के लिए “FIND & REPLACE” विधि का उपयोग कर सकते हैं और पाए गए मूल्य को कुछ और के साथ बदल सकते हैं।