किसी Word दस्तावेज़ में एक ही समय में एकाधिक शब्द कैसे खोजें और बदलें?
Word किसी शब्द या वाक्यांश के सभी उदाहरणों को खोजने और उन्हें एक ही समय में एक नए शब्द से बदलने के लिए एक ढूँढें और बदलें फ़ंक्शन प्रदान करता है। लेकिन यदि आप एक ही समय में अलग-अलग शब्द ढूंढना और बदलना चाहते हैं, तो यह बिल्ड-इन फ़ंक्शन मदद नहीं कर सकता है। इस लेख में, हम Word दस्तावेज़ में एक ही समय में कई अलग-अलग शब्दों को खोजने और बदलने के लिए VBA विधि के बारे में बात कर रहे हैं।
Word में एक ही समय में एकाधिक शब्द ढूंढें और उन्हें VBA कोड से बदलें
एक अद्भुत सुविधा के साथ वर्ड में एक ही समय में कई शब्दों को आसानी से ढूंढें और बदलें
Word में एक ही समय में एकाधिक शब्द ढूंढें और उन्हें VBA कोड से बदलें
किसी Word दस्तावेज़ में एक ही समय में एकाधिक शब्द ढूंढने और बदलने के लिए कृपया निम्नानुसार कार्य करें।
1. वह वर्ड दस्तावेज़ खोलें जिसे आप एक ही समय में कई शब्दों को ढूंढना और बदलना चाहते हैं, फिर दबाएं ऑल्ट + F11 कुंजी को खोलने के लिए अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की.
2। में अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की, क्लिक करें सम्मिलित करें > मॉड्यूल। फिर नीचे दिए गए VBA कोड को मॉड्यूल विंडो में कॉपी करें।
वीबीए कोड: वर्ड में एक ही समय में कई शब्द ढूंढें और बदलें
Sub FindAndReplaceMultiItems()
'Update by ExtendOffice 2018/10/25
Dim xFind As String
Dim xReplace As String
Dim xFindArr, xReplaceArr
Dim I As Long
Application.ScreenUpdating = False
xFind = InputBox("Enter items to be found here,seperated by comma: ", "Kutools for Word")
xReplace = InputBox("Enter new items here, seperated by comma: ", "Kutools for Word")
xFindArr = Split(xFind, ",")
xReplaceArr = Split(xReplace, ",")
If UBound(xFindArr) <> UBound(xReplaceArr) Then
MsgBox "Find and replace characters must be equal.", vbInformation, "Kutools for Word"
Exit Sub
End If
For I = 0 To UBound(xFindArr)
Selection.HomeKey Unit:=wdStory
With Selection.Find
.ClearFormatting
.Replacement.ClearFormatting
.Text = xFindArr(I)
.Replacement.Text = xReplaceArr(I)
.Format = False
.MatchWholeWord = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
Next
Application.ScreenUpdating = True
End Sub
3। दबाएं F5 कोड चलाने की कुंजी.
4. प्रथम में वर्ड के लिए कुटूल संवाद बॉक्स में, आपको जो अनेक शब्द मिलेंगे उन्हें टेक्स्टबॉक्स में दर्ज करें और प्रतिस्थापित करें, और उन्हें अल्पविराम से अलग करें, फिर क्लिक करें OK बटन। स्क्रीनशॉट देखें:
5. दूसरे में वर्ड के लिए कुटूल संवाद बॉक्स में, वे नए शब्द दर्ज करें जिन्हें आप प्रतिस्थापित करेंगे (इन शब्दों को भी अल्पविराम से अलग करने की आवश्यकता है), और फिर क्लिक करें OK बटन.
नोट: इस मामले में, सभी "केटीई" इस दस्तावेज़ में प्रतिस्थापित किया जाएगा "नया", और "केटीओ" और "केटीडब्ल्यू" के साथ बदल दिया जाएगा "परीक्षण" और "समाप्त"। कृपया उन्हें अपनी आवश्यकताओं के अनुसार बदलें।
एक अद्भुत सुविधा के साथ वर्ड में एक ही समय में कई शब्दों को आसानी से ढूंढें और बदलें
RSI बैच ढूंढें और बदलें का लक्षण वर्ड के लिए कुटूल किसी दस्तावेज़ में या एक ही समय में कई दस्तावेज़ों में अलग-अलग टेक्स्ट को आसानी से ढूंढने और बदलने में मदद मिल सकती है।
इस सुविधा को लागू करने से पहले कृपया कुछ मिनट का समय लें सबसे पहले इसे डाउनलोड करें और इंस्टॉल करें.
1. माइक्रोसॉफ्ट वर्ड एप्लिकेशन लॉन्च करें, क्लिक करें कुटूल्स प्लस > बैच ढूंढें और बदलें.
2। में बैच ढूंढें और बदलें विंडो, कृपया निम्नानुसार कॉन्फ़िगर करें।
- 2.1 क्लिक करें बटन> फाइल जोडें or फ़ोल्डर जोड़ें एक या अधिक दस्तावेज़ जोड़ने के लिए जिसमें आप एकाधिक शब्द ढूंढेंगे और प्रतिस्थापित करेंगे।
- 2.2 क्लिक करें लाइन जोड़ो फ़ील्ड ढूंढने और बदलने के लिए बटन। यदि आप एक ही समय में तीन अलग-अलग टेक्स्ट ढूंढना और बदलना चाहते हैं, तो कृपया तीन पंक्तियाँ बनाएँ।
- 2.3 प्रत्येक पंक्ति में, मौजूदा शब्द दर्ज करें जिन्हें आप एक नए से बदल देंगे खोज कॉलम, और फिर नए शब्द दर्ज करें बदलें स्तंभ.
- 2.4 निर्दिष्ट करें तलाश की विधि प्रत्येक पंक्ति के लिए.
- 2.5 में में देखो कॉलम, चुनें कि कहां खोज को लागू करना है और कहां बदलना है। इसमें शामिल है मुख्य दस्तावेज़, हैडर और पाद इस खंड में। आप अपनी आवश्यकताओं के आधार पर उनमें से एक, दो या सभी को चुन सकते हैं।
- 2.6. क्लिक करें बदलें ऑपरेशन शुरू करने के लिए बटन। स्क्रीनशॉट देखें:
फिर विशिष्ट शब्दों को उसी समय चयनित दस्तावेज़ों में बदल दिया जाता है।
सुझाव: आप कुछ रंग निर्दिष्ट करके पृष्ठभूमि रंग के साथ परिणाम को हाइलाइट कर सकते हैं हाइलाइट एक पंक्ति के लिए कॉलम.
यदि आप इस उपयोगिता का निःशुल्क परीक्षण (60-दिन) चाहते हैं, कृपया इसे डाउनलोड करने के लिए क्लिक करें, और फिर उपरोक्त चरणों के अनुसार ऑपरेशन लागू करने के लिए जाएं।
सर्वोत्तम कार्यालय उत्पादकता उपकरण
वर्ड के लिए कुटूल - ओवर के साथ अपने शब्द अनुभव को उन्नत करें 100 उल्लेखनीय विशेषताएं!
🤖 कुटूल्स एआई असिस्टेंट: एआई के साथ अपना लेखन बदलें - सामग्री उत्पन्न करें / पाठ पुनः लिखें / दस्तावेज़ों को सारांशित करें / जानकारी के लिए पूछताछ करें दस्तावेज़ पर आधारित, सभी वर्ड के भीतर
📘 दस्तावेज़ महारत: पन्ने विभाजित करें / दस्तावेज़ मर्ज करें / विभिन्न प्रारूपों में निर्यात चयन (पीडीएफ/टीएक्सटी/डीओसी/एचटीएमएल...) / बैच को पीडीएफ में कनवर्ट करें / पेजों को छवियों के रूप में निर्यात करें / एक साथ अनेक फ़ाइलें प्रिंट करें...
✏ सामग्री संपादन: बैच ढूंढें और बदलें अनेक फ़ाइलों में / सभी चित्रों का आकार बदलें / तालिका पंक्तियों और स्तंभों को स्थानांतरित करें / तालिका को पाठ में बदलें...
🧹 सहज स्वच्छ: साफ़ कर दो अतिरिक्त स्थान / अनुभाग टूट जाता है / सभी शीर्षलेख / पाठ बक्से / हाइपरलिंक / अधिक हटाने वाले टूल के लिए, यहां जाएं समूह हटाएँ...
➕ रचनात्मक निवेशन: डालें हजार विभाजक / चेक बॉक्स / रेडियो बटन / क्यूआर कोड / बारकोड / विकर्ण रेखा तालिका / समीकरण कैप्शन / तस्वीर का शीर्षक / सारणी का शीर्षक / एकाधिक चित्र / में और अधिक खोजें समूह सम्मिलित करें...
🔍 परिशुद्धता चयन: सटीक विशिष्ट पृष्ठ / टेबल्स / आकृतियाँ / शीर्षक पैराग्राफ / के साथ नेविगेशन बढ़ाएँ अधिक सुविधाएँ चुनें...
⭐ स्टार संवर्द्धन: किसी भी स्थान पर नेविगेट करें / दोहरावदार पाठ स्वतः सम्मिलित करें / दस्तावेज़ विंडोज़ के बीच टॉगल करें / 11 रूपांतरण उपकरण...