إليك برنامج تعليمي لاستخراج جميع عناوين البريد الإلكتروني من مستندات Word^{(extract all email addresses from Word documents)} في Windows 11/10 . إذا كان لديك مستندات Word ( DOC ، DOCX ) بعناوين بريد إلكتروني متعددة وتريد استخدام عناوين البريد الإلكتروني هذه لأي غرض ، فسيكون من المتعب حقًا البحث عنها يدويًا. الحل الأسهل بالنسبة لك هو استخراج جميع عناوين البريد الإلكتروني من المستند ثم استخدامها كما تريد. الآن ، لاستخراج عناوين البريد الإلكتروني من مستندات Word ، لا تحتاج إلى أي حل تابع لجهة خارجية. في هذه المقالة ، سأعرض حيلتين بسيطتين لاستخراج عناوين البريد الإلكتروني من مستندات Word . يمكنك القيام بذلك في برنامج Microsoft Wordتطبيق. دعونا نتحقق من الأساليب الآن!

كيفية استخراج عناوين البريد الإلكتروني^{(Email Addresses)} من مستند Word

فيما يلي طريقتان لاستخراج جميع عناوين البريد الإلكتروني من مستند Word^(Word) في Windows 11/10 :

1. استخراج^(Extract) عناوين البريد الإلكتروني باستخدام خيار البحث المتقدم في ^{(Advanced Find)}MS Word .
2. استخدم^{(Use VBA)} التعليمات البرمجية لـ VBA لاستخراج كافة عناوين البريد الإلكتروني من مستند Word^(Word) .

دعونا نتحدث عن هذه الأساليب بالتفصيل!

1] استخراج^(Extract) عناوين البريد الإلكتروني باستخدام خيار البحث المتقدم في ^{(Advanced Find)}MS Word

يمكنك استخدام خيار Advanced Find/ Find واستبدال متقدم في Microsoft Word لاستخراج جميع عناوين البريد الإلكتروني من مستندات Word . فيما يلي الخطوات الرئيسية للقيام بذلك:

1. قم بتشغيل Microsoft Word.
2. افتح مستند Word^(Word) يحتوي على عناوين بريد إلكتروني.
3. انتقل إلى خيار Find > Advanced Find .
4. أدخل سلسلة في البحث عن^(Find) الحقل.
5. قم بتمكين مربع الاختيار استخدام أحرف البدل.
6. انقر فوق^(Click) الزر Find In^(Find) > > Main Document
7. ارجع إلى المستند الرئيسي واستخدم خيار النسخ^(Copy) .
8. قم بإنشاء مستند جديد فارغ والصق عناوين البريد الإلكتروني المنسوخة.

الآن ، دعنا نوضح هذه الخطوات بالتفصيل الآن!

أولاً ، قم بتشغيل تطبيق Microsoft Word على جهاز الكمبيوتر الخاص بك ، ثم قم باستيراد مستند Word^(Word) يحتوي على عناوين البريد الإلكتروني التي تريد استخراجها.

الآن ، في علامة التبويب الصفحة الرئيسية^(Home) ، انتقل إلى قسم التحرير^(Editing) وانقر على زر القائمة المنسدلة بحث . ^{( Find)}ثم ، اضغط على خيار البحث المتقدم^{(Advanced Find)} . سيؤدي هذا إلى فتح مربع حوار " بحث واستبدال ".^{(Find and Replace)}

في مربع الحوار " بحث واستبدال " ، من علامة التبويب " ^{(Find and Replace)}بحث^(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) إلى الحافظة.

بعد ذلك ، قم بإنشاء مستند Word^(Word) فارغ أو افتح تطبيق Notepad والصق ببساطة عناوين البريد الإلكتروني المنسوخة باستخدام الخيار المخصص أو مفتاح الاختصار Ctrl + V

يمكنك الآن حفظ المستند بعناوين البريد الإلكتروني المستخرجة من مستند Word^(Word) واستخدام عناوين البريد الإلكتروني كما تريد.

قراءة^(Read) : كيفية تعطيل Splash Screen في برامج Office .

2] استخدم^{(Use VBA)} كود فبا لاستخراج جميع عناوين البريد الإلكتروني من وثيقة وورد^(Word)

يمكنك أيضًا استخدام رمز Visual Basic for Applications ( VBA ) بسيط لاستخراج جميع عناوين البريد الإلكتروني من مستندات Word . فيما يلي الخطوات الرئيسية للقيام بذلك:

1. افتح تطبيق Word ثم قم باستيراد المستند المصدر.
2. قم بتشغيل محرر VBA.
3. أدخل وحدة جديدة.
4. أدخل^(Enter) رمز VBA لاستخراج عنوان البريد الإلكتروني.
5. قم بتشغيل التعليمات البرمجية لـ VBA لاستخراج كافة عناوين البريد الإلكتروني.

أولاً ، افتح تطبيق Word ، ثم قم باستيراد مستند Word^(Word) الذي تريد استخراج جميع عناوين البريد الإلكتروني منه.

الآن ، قم بتشغيل محرر VBA^{(VBA Editor)} باستخدام تركيبة المفاتيح Alt + F11إذا قمت بتمكين علامة التبويب Developers على الشريط الرئيسي ، فيمكنك الانتقال إلى علامة التبويب Developer والنقر فوق خيار Visual Basic لفتح محرر VBA.

بعد ذلك ، في نافذة محرر VBA^{(VBA Editor)} ، انتقل إلى قائمة " إدراج^{( 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^(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

• كيفية جعل واحدة page landscape في Word

• لا يمكن فتح الملف لأن هناك مشاكل في المحتويات

• كيفية إدراج Music Notes و Symbols في Word document

• كيفية إدراج Text في شكل في Word

• كيفية رسم في Microsoft Word باستخدام أدوات Draw Tab

• كيفية تغيير AutoSave and AutoRecover time في Word

• كيفية إضافة أو إزالة أو إدراج أرقام الصفحات في Word

• كيفية إظهار Spelling and Grammar tool على Quick Access Toolbar في Word

• كيفية تراكب الصور في Word

• كيفية صنع نشرة في Microsoft Word

• كيفية استخدام Microsoft Editor للتحقق Grammar والتهدئة

• كيفية بدء تشغيل Word، Excel، PowerPoint، Outlook في Safe Mode

• كيفية استيراد الأساليب من وثيقة إلى أخرى في Word

• كيفية استخدام Mail Merge ل Letters في Word

• Convert Word وثائق إلى JPG باستخدام Batch Word إلى JPG Converter