در اینجا یک آموزش برای استخراج تمام آدرس های ایمیل از اسناد Word^{(extract all email addresses from Word documents)} در Windows 11/10 وجود دارد. اگر اسناد Word ( DOC ، DOCX ) با چندین آدرس ایمیل دارید و می‌خواهید از آن آدرس‌های ایمیل برای هر هدفی استفاده کنید، جستجوی دستی آنها واقعاً خسته‌کننده خواهد بود. یک راه حل ساده تر برای شما این است که تمام آدرس های ایمیل را از سند استخراج کنید و سپس از آنها همانطور که می خواهید استفاده کنید. اکنون، برای استخراج آدرس های ایمیل از اسناد Word ، به هیچ راه حل شخص ثالثی نیاز ندارید. در این مقاله قصد دارم دو ترفند ساده برای استخراج آدرس ایمیل از اسناد Word را نشان دهم. ^(Word)شما می توانید این کار را در Microsoft Word انجام دهید^{(Microsoft Word)}کاربرد. اجازه دهید اکنون روش ها را بررسی کنیم!

نحوه استخراج آدرس ایمیل^{(Email Addresses)} از سند Word

در اینجا دو روش برای استخراج تمام آدرس های ایمیل از یک سند Word در Windows 11/10 دارد :

1. ^(Extract)آدرس های ایمیل را با استفاده از گزینه Advanced Find در MS Word استخراج کنید.
2. از کد VBA^{(Use VBA)} برای استخراج تمام آدرس های ایمیل از یک سند Word استفاده کنید.^(Word)

اجازه دهید در مورد این روش ها با جزئیات صحبت کنیم!

1] آدرس های ایمیل را با استفاده از گزینه Advanced Find در MS Word استخراج کنید^(Extract)

می توانید از گزینه Advanced Find/ Find and جایگزین در Microsoft Word برای استخراج تمام آدرس های ایمیل از اسناد Word استفاده کنید. ^(Word)در اینجا مراحل اصلی برای انجام این کار وجود دارد:

1. Microsoft Word را راه اندازی کنید.
2. یک سند Word حاوی آدرس ایمیل باز کنید.
3. به گزینه Find > Advanced Find بروید .
4. یک رشته را در قسمت Find what وارد کنید.
5. کادر انتخاب Use wildcards را فعال کنید.
6. روی دکمه^(Click) Find In^(Find) > > Main Document کلیک کنید.
7. به سند اصلی برگردید و از گزینه Copy استفاده کنید.
8. یک سند خالی جدید ایجاد کنید و آدرس های ایمیل کپی شده را جایگذاری کنید.

حالا بیایید این مراحل را به تفصیل توضیح دهیم!

ابتدا برنامه Microsoft Word را روی رایانه شخصی خود اجرا کنید و سپس یک سند Word را وارد کنید که حاوی آدرس های ایمیلی است که می خواهید استخراج کنید.

اکنون در تب Home به قسمت Editing رفته و بر روی دکمه کشویی Find کلیک کنید. ^{( Find)}سپس بر روی گزینه Advanced Find ضربه بزنید . با این کار کادر گفتگوی Find and Replace باز می شود.^{(Find and Replace)}

در کادر گفتگوی Find and Replace ، از برگه Find ، رشته ^(Find)[A-z,0-9]{1,}\@[A-z,0-9,\.]{1,} را در قسمت Find what وارد کنید.

پس از آن، دکمه More را فشار دهید تا گزینه های مختلف باز شود.

بعد، کادر انتخاب Use wildcards را فعال کنید.

سپس بر روی دکمه کشویی Find In کلیک کرده و گزینه ^{(Find In)}Main Document را انتخاب کنید.

همانطور که در تصویر زیر نشان داده شده است، همانطور که این کار را انجام می دهید، تمام آدرس های ایمیل در سند منبع Word برجسته و انتخاب می شوند.^(Word)

حالا کاری که باید انجام دهید این است که روی دکمه کپی^(Copy) موجود در تب Home کلیک کنید. متناوبا، می توانید از کلید میانبر کپی یعنی کلید Ctrl +C نیز استفاده کنید . تمام آدرس های ایمیل موجود در سند Word را در کلیپ بورد کپی می کند.

سپس، یک سند Word خالی ایجاد کنید یا برنامه Notepad را باز کنید و به سادگی آدرس های ایمیل کپی شده را با استفاده از گزینه اختصاصی یا Ctrl + V جایگذاری کنید .

اکنون می توانید سند را با آدرس های ایمیل استخراج شده از سند Word ذخیره کنید و از آدرس های ایمیل هر طور که می خواهید استفاده کنید.

بخوانید^(Read) : نحوه غیرفعال کردن Splash Screen در برنامه های آفیس .

2] از کد VBA^{(Use VBA)} برای استخراج تمام آدرس های ایمیل از یک سند Word استفاده کنید^(Word)

همچنین می توانید از یک کد ساده Visual Basic for Applications ( VBA ) برای استخراج تمام آدرس های ایمیل از اسناد Word استفاده کنید. ^(Word)در اینجا مراحل اصلی برای انجام این کار وجود دارد:

1. برنامه Word^(Word) را باز کنید و سپس سند منبع را وارد کنید.
2. ویرایشگر VBA را راه اندازی کنید.
3. یک ماژول جدید درج کنید.
4. کد ^(Enter)VBA را برای استخراج آدرس ایمیل وارد کنید.
5. کد VBA^(VBA) را برای استخراج تمام آدرس های ایمیل اجرا کنید .

ابتدا برنامه Word را باز کنید و سپس سند ^(Word)ورد^(Word) ورودی را که می‌خواهید همه آدرس‌های ایمیل را از آن استخراج کنید، وارد کنید.

اکنون ویرایشگر VBA^{(VBA Editor)} را با استفاده از کلیدهای ترکیبی Alt + F11اگر تب Developers را در نوار اصلی فعال کرده اید، می توانید به تب Developer رفته و روی گزینه Visual Basic کلیک کنید تا ویرایشگر VBA باز شود.

سپس در پنجره VBA Editor به منوی ^{(VBA Editor)}Insert رفته^{( Insert)} و بر روی گزینه Module کلیک کنید.

پس از آن، در قسمت سمت راست، کد 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

سپس به منوی Run رفته و روی گزینه Run Macros یا به سادگی کلید F5 را کلیک کنید. یک پنجره گفتگوی ماکرو^(Macros) باز می شود که در آن باید ماکرو ایجاد شده را انتخاب کنید و سپس روی دکمه Run کلیک کنید.

با کلیک بر روی دکمه Run ، یک سند Word جدید با تمام آدرس های ایمیل استخراج شده از سند Word باز می شود.

شما به سادگی می توانید سند را با آدرس های ایمیل استخراج شده ذخیره کنید و در صورت نیاز از آنها استفاده کنید.

از آنجایی که مایکروسافت ورد^{(Microsoft Word)} از انواع فرمت‌های سند پشتیبانی می‌کند، این روش‌های استخراج آدرس ایمیل را می‌توان برای یک سند غیر Word نیز استفاده کرد، مانند XML ، ODT و غیره.

اکنون بخوانید: ^{(Now read:)} با استفاده از Easy Email Extractor آدرس های ایمیل را استخراج کنید.^{(Extract email addresses using Easy Email Extractor.)}

How to extract Email Addresses from Word document

Here is a tutorial to extract all email addresses from Word documents in Windows 11/10. If you have Word documents (DOC, DOCX) with multiple email addresses and you want to use those email addresses for any purpose, it will be really tiring to manually search for them. An easier solution for you is to extract all email addresses from the document and then use them as you want. Now, to extract email addresses from Word documents, you don’t need any third-party solution. In this article, I am going to show two simple tricks to extract email addresses from Word documents. You can do so in the Microsoft Word application. Let us check out the methods now!

How to extract Email Addresses from Word document

Here are the two methods to extract all email addresses from a Word document in Windows 11/10:

1. Extract email addresses using the Advanced Find option in MS Word.
2. Use VBA code to extract all email addresses from a Word document.

Let us talk about these methods in detail!

1] Extract email addresses using the Advanced Find option in MS Word

You can use the Advanced Find/ Find and replace option in Microsoft Word to extract all email addresses from Word documents. Here are the main steps to do so:

1. Launch Microsoft Word.
2. Open a Word document containing email addresses.
3. Go to the Find > Advanced Find option.
4. Enter a string in the Find what field.
5. Enable the Use wildcards checkbox.
6. Click on the Find In > Main Document button.
7. Return to the main document and use the Copy option.
8. Create a new blank document and paste copied email addresses.

Now, let’s elaborate on these steps now!

Firstly, run the Microsoft Word application on your PC and then import a Word document that contains the email addresses that you want to extract.

Now, in the Home tab, go to the Editing section and click on the Find drop-down button. Then, tap on the Advanced Find option. This will open up a Find and Replace dialog box.

In the Find and Replace dialog box, from the Find tab, enter the [A-z,0-9]{1,}\@[A-z,0-9,\.]{1,} string in the Find what field.

After that, press the More button which will open up various options.

Next, enable the Use wildcards checkbox.

Then, click on the Find In drop-down button and select the Main Document option.

As you do that, all the mail addresses will be highlighted and selected in the source Word document, as shown in the below screenshot.

Now what you have to do is that click on the Copy button present in the Home tab. Alternately, you can also use copy hotkey i.e., Ctrl +C shortcut key. It will copy all the email addresses present in the Word document to the clipboard.

Next, create a blank Word document or open the Notepad app and simply paste the copied email addresses using the dedicated option or Ctrl + V hotkey.

You can now save the document with extracted email addresses from the Word document and use the email addresses however you want.

Read: How to disable Splash Screen in Office programs.

2] Use VBA code to extract all email addresses from a Word document

You can also use a simple Visual Basic for Applications (VBA) code in order to extract all email addresses from Word documents. Here are the main steps to do so:

1. Open the Word app and then import the source document.
2. Launch VBA Editor.
3. Insert a new module.
4. Enter the VBA code for email address extraction.
5. Run the VBA code to extract all email addresses.

First, open the Word app and then import the input Word document from which you want to extract all email addresses.

Now, launch the VBA Editor using the Alt + F11 key combination. If you have enabled the Developers tab on the main ribbon, you can go to the Developer tab and click on the Visual Basic option to open up the VBA Editor.

Next, in the VBA Editor window, go to the Insert menu and click on the Module option.

After that, in the right section, enter the below VBA code in the editor window:

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

Then, go to the Run menu and click on the Run Macros option or simply the F5 key. A Macros dialog window will open up where you need to select the created macro and then click the Run button.

As you click on the Run button, a new Word document will open up with all the extracted email addresses from the Word document.

You can simply save the document with extracted email addresses and use them as required.

As Microsoft Word supports a variety of document formats, these email address extraction methods can be used for a non-Word document too, such as XML, ODT, etc.

Now read: Extract email addresses using Easy Email Extractor.

Related posts

• چگونه برای ایجاد Temporary Email Addresses با YOPmail

• چگونه به استفاده از Rewrite Suggestions در Word برای Web application

• Excel، Word or PowerPoint شروع نشد آخرین بار

• چگونه برای ایجاد Booklet or Book با Microsoft Word

• چگونه به خاموش کردن Paragraph علائم در Microsoft Word

• چگونه شروع به Word، Excel، PowerPoint، Outlook در Safe Mode

• Word باز می شود اسناد در حالت فقط خواندنی در Windows 10

• نحوه استفاده از Microsoft Editor برای بررسی Grammar و املا

• حذف Background از یک تصویر با Microsoft Word

• نحوه استفاده از Quick Parts Document Property feature در Word

• Convert Word اسناد به JPG با استفاده از Batch Word به JPG Converter

• چگونه به جستجو برای Online Templates در Microsoft Word

• چگونه به واردات سبک از یک سند را به دیگری در Word

• چگونه می توان یک برگه را در Microsoft Word ایجاد کرد

• نحوه وارد کردن Text از Word file به Publisher publication

• چگونه برای تغییر File Format پیش فرض برای صرفه جویی در Word، Excel، PowerPoint

• چگونه برای وارد کردن یک علامت در Word document

• Word اسناد باز در WordPad به جای Word

• Jarte رایگان Word Processor قابل حمل ویژگی های غنی برای Windows PC است

• نحوه استفاده از Linked Text در Word برای به روز رسانی اسناد متعدد