यहां वर्ड दस्तावेज़ों से सभी ईमेल पते निकालने . के लिए एक ट्यूटोरियल है विंडोज 11/10 में। यदि आपके पास एकाधिक ईमेल पतों के साथ Word दस्तावेज़ (DOC, DOCX) हैं और आप किसी भी उद्देश्य के लिए उन ईमेल पतों का उपयोग करना चाहते हैं, तो उन्हें मैन्युअल रूप से खोजना वास्तव में थका देने वाला होगा। आपके लिए एक आसान उपाय यह है कि आप दस्तावेज़ से सभी ईमेल पते निकालें और फिर उन्हें अपनी इच्छानुसार उपयोग करें। अब, Word दस्तावेज़ों से ईमेल पते निकालने के लिए, आपको किसी तृतीय-पक्ष समाधान की आवश्यकता नहीं है। इस लेख में, मैं Word दस्तावेज़ों से ईमेल पते निकालने के लिए दो सरल तरकीबें दिखाने जा रहा हूँ। आप Microsoft Word एप्लिकेशन में ऐसा कर सकते हैं। आइए अब विधियों की जाँच करें!
वर्ड डॉक्यूमेंट से ईमेल एड्रेस कैसे निकालें
विंडोज 11/10 में वर्ड डॉक्यूमेंट से सभी ईमेल एड्रेस निकालने के दो तरीके यहां दिए गए हैं:
- एमएस वर्ड में उन्नत खोज विकल्प का उपयोग करके ईमेल पते निकालें।
- किसी Word दस्तावेज़ से सभी ईमेल पते निकालने के लिए VBA कोड का उपयोग करें।
आइए इन तरीकों के बारे में विस्तार से बात करते हैं!
1] MS Word में उन्नत खोज विकल्प का उपयोग करके ईमेल पते निकालें
आप Word दस्तावेज़ों से सभी ईमेल पते निकालने के लिए Microsoft Word में उन्नत खोज / ढूँढें और बदलें विकल्प का उपयोग कर सकते हैं। ऐसा करने के लिए यहां मुख्य चरण दिए गए हैं:
- माइक्रोसॉफ्ट वर्ड लॉन्च करें।
- ईमेल पतों वाला Word दस्तावेज़ खोलें।
- ढूंढें> उन्नत खोज विकल्प पर जाएं।
- क्या फ़ील्ड ढूंढें में एक स्ट्रिंग दर्ज करें।
- वाइल्डकार्ड का उपयोग करें चेकबॉक्स सक्षम करें।
- ढूंढें> मुख्य दस्तावेज़ बटन पर क्लिक करें।
- मुख्य दस्तावेज़ पर लौटें और कॉपी विकल्प का उपयोग करें।
- एक नया रिक्त दस्तावेज़ बनाएं और कॉपी किए गए ईमेल पते पेस्ट करें।
आइए, अब इन चरणों के बारे में विस्तार से बताते हैं!
सबसे पहले, अपने पीसी पर माइक्रोसॉफ्ट वर्ड एप्लिकेशन चलाएं और फिर एक वर्ड दस्तावेज़ आयात करें जिसमें ईमेल पते शामिल हों जिन्हें आप निकालना चाहते हैं।
अब, होम . में टैब पर जाएं, संपादन . पर जाएं अनुभाग और ढूंढें . पर क्लिक करें ड्रॉप-डाउन बटन। फिर, उन्नत खोज . पर टैप करें विकल्प। इससे एक ढूंढें और बदलें खुल जाएगा डायलॉग बॉक्स।
ढूंढें और बदलें . में संवाद बॉक्स में, ढूँढें टैब से, [A-z,0-9]{1,}\@[A-z,0-9,\.]{1,} दर्ज करें स्ट्रिंग में क्या ढूंढें फ़ील्ड.
उसके बाद, अधिक . दबाएं बटन जो विभिन्न विकल्प खोलेगा।
इसके बाद, वाइल्डकार्ड का उपयोग करें को सक्षम करें चेकबॉक्स।
फिर, ढूंढें . पर क्लिक करें ड्रॉप-डाउन बटन और मुख्य दस्तावेज़ . चुनें विकल्प।
जैसा कि आप ऐसा करते हैं, सभी मेल पतों को हाइलाइट किया जाएगा और स्रोत वर्ड दस्तावेज़ में चुना जाएगा, जैसा कि नीचे स्क्रीनशॉट में दिखाया गया है।
अब आपको क्या करना है कि Copy . पर क्लिक करें होम . में मौजूद बटन टैब। वैकल्पिक रूप से, आप कॉपी हॉटकी यानी Ctrl +C शॉर्टकट कुंजी का भी उपयोग कर सकते हैं। यह Word दस्तावेज़ में मौजूद सभी ईमेल पतों को क्लिपबोर्ड पर कॉपी कर देगा।
इसके बाद, एक रिक्त वर्ड दस्तावेज़ बनाएं या नोटपैड ऐप खोलें और केवल समर्पित विकल्प या Ctrl + V हॉटकी का उपयोग करके कॉपी किए गए ईमेल पते पेस्ट करें।
अब आप Word दस्तावेज़ से निकाले गए ईमेल पतों के साथ दस्तावेज़ को सहेज सकते हैं और ईमेल पतों का उपयोग अपनी इच्छानुसार कर सकते हैं।
पढ़ें :ऑफिस प्रोग्राम्स में स्प्लैश स्क्रीन को डिसेबल कैसे करें।
2] किसी Word दस्तावेज़ से सभी ईमेल पते निकालने के लिए VBA कोड का उपयोग करें
Word दस्तावेज़ों से सभी ईमेल पते निकालने के लिए आप एक साधारण Visual Basic for Applications (VBA) कोड का भी उपयोग कर सकते हैं। ऐसा करने के लिए यहां मुख्य चरण दिए गए हैं:
- वर्ड ऐप खोलें और फिर स्रोत दस्तावेज़ आयात करें।
- VBA संपादक लॉन्च करें।
- नया मॉड्यूल डालें।
- ईमेल पता निकालने के लिए VBA कोड दर्ज करें।
- सभी ईमेल पते निकालने के लिए VBA कोड चलाएँ।
सबसे पहले, Word ऐप खोलें और फिर इनपुट Word दस्तावेज़ आयात करें जिससे आप सभी ईमेल पते निकालना चाहते हैं।
अब, Alt + F11 . का उपयोग करके VBA संपादक लॉन्च करें कुंजी संयोजन। यदि आपने डेवलपर्स . को सक्षम किया है मुख्य रिबन पर टैब, आप डेवलपर टैब पर जा सकते हैं और विजुअल बेसिक . पर क्लिक कर सकते हैं VBA संपादक खोलने का विकल्प।
इसके बाद, VBA संपादक विंडो में, सम्मिलित करें . पर जाएं मेनू और मॉड्यूल . पर क्लिक करें विकल्प।
उसके बाद, दाहिने भाग में, संपादक विंडो में नीचे दिया गया VBA कोड दर्ज करें:
Sub ExtractAllEmailAddressesFromDocument() Dim strEmailAddresses As String ' Extract all email addresses in a document. With ActiveDocument.Range With.Find .ClearFormatting .Replacement.ClearFormatting .Text = "[A-z,0-9]{1,}\@[A-z,0-9,\.]{1,}" .Replacement.Text = "" .Forward = True .Wrap = wdFindStop .Format = False .MatchCase = False .MatchWholeWord = False .MatchByte = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = True .Execute End With Do While .Find.Found strEmailAddresses = strEmailAddresses & .Text & ";" .Collapse wdCollapseEnd .Find.Execute Loop End With ' Open a new document to paste the email addresses. If strEmailAddresses <> "" Then Documents.Add Template:="Normal", NewTemplate:=False, DocumentType:=0 ActiveDocument.Range.Text = strEmailAddresses End If End Sub
फिर, भागो . पर जाएं मेनू पर क्लिक करें और मैक्रो चलाएँ . पर क्लिक करें विकल्प या बस F5 कुंजी। एक मैक्रोज़ डायलॉग विंडो खुलेगी जहां आपको बनाए गए मैक्रो का चयन करना होगा और फिर रन बटन पर क्लिक करना होगा।
जैसे ही आप रन बटन पर क्लिक करते हैं, वर्ड दस्तावेज़ से निकाले गए सभी ईमेल पतों के साथ एक नया वर्ड दस्तावेज़ खुल जाएगा।
आप बस निकाले गए ईमेल पतों के साथ दस्तावेज़ को सहेज सकते हैं और आवश्यकतानुसार उनका उपयोग कर सकते हैं।
चूंकि माइक्रोसॉफ्ट वर्ड विभिन्न प्रकार के दस्तावेज़ स्वरूपों का समर्थन करता है, इन ईमेल पता निष्कर्षण विधियों का उपयोग गैर-वर्ड दस्तावेज़ के लिए भी किया जा सकता है, जैसे एक्सएमएल, ओडीटी, आदि।
अब पढ़ें: आसान ईमेल एक्सट्रैक्टर का उपयोग करके ईमेल पते निकालें।