Вот руководство по извлечению всех адресов электронной почты из документов Word^{(extract all email addresses from Word documents)} в Windows 11/10 . Если у вас есть документы Word ( DOC , DOCX ) с несколькими адресами электронной почты, и вы хотите использовать эти адреса электронной почты для любых целей, будет очень утомительно искать их вручную. Более простое решение для вас — извлечь все адреса электронной почты из документа, а затем использовать их по своему усмотрению. Теперь для извлечения адресов электронной почты из документов Word не требуется никаких сторонних решений. В этой статье я собираюсь показать два простых приема для извлечения адресов электронной почты из документов Word . Вы можете сделать это в Microsoft Wordзаявление. Давайте проверим методы сейчас!

Как извлечь адреса электронной почты^{(Email Addresses)} из документа Word

Вот два метода извлечения всех адресов электронной почты из документа Word в Windows 11/10 :

1. Извлеките^(Extract) адреса электронной почты с помощью расширенного поиска^{(Advanced Find)} в MS Word .
2. Используйте^{(Use VBA)} код VBA для извлечения всех адресов электронной почты из документа Word .

Поговорим об этих методах подробнее!

1] Извлеките^(Extract) адреса электронной почты, используя параметр « Расширенный поиск^{(Advanced Find)} » в MS Word .

Вы можете использовать Advanced Find/ Find и заменить параметр в Microsoft Word , чтобы извлечь все адреса электронной почты из документов Word . Вот основные шаги для этого:

1. Запустите Microsoft Word.
2. Откройте документ Word , содержащий адреса электронной почты.
3. Перейдите к опции « Find > Advanced Find
4. Введите строку в поле « Найти^(Find) ».
5. Установите флажок Использовать подстановочные знаки.
6. Нажмите кнопку^(Click) « Найти^(Find) в > Main Document .
7. Вернитесь к основному документу и используйте параметр « Копировать^(Copy) ».
8. Создайте новый пустой документ и вставьте скопированные адреса электронной почты.

А теперь давайте подробнее об этих шагах!

Сначала запустите приложение Microsoft 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)}Основной документ^{(Main Document)} ».

При этом все почтовые адреса будут выделены и выбраны в исходном документе Word , как показано на снимке экрана ниже.

Теперь вам нужно нажать кнопку « Копировать^(Copy) » на вкладке « Главная ». ^(Home)Кроме того, вы также можете использовать горячую клавишу копирования, например, сочетание клавиш Ctrl +CОн скопирует все адреса электронной почты, присутствующие в документе Word , в буфер обмена.

Затем создайте пустой документ Word или откройте приложение « Блокнот^(Notepad) » и просто вставьте скопированные адреса электронной почты, используя специальную опцию или горячую клавишу Ctrl + V

Теперь вы можете сохранить документ с извлеченными адресами электронной почты из документа Word и использовать адреса электронной почты по своему усмотрению.

Читайте^(Read) : Как отключить заставку в программах Office .

2] Используйте^{(Use VBA)} код VBA для извлечения всех адресов электронной почты из документа Word .

Вы также можете использовать простой код Visual Basic для приложений^{(Applications)} ( VBA ), чтобы извлечь все адреса электронной почты из документов Word . Вот основные шаги для этого:

1. Откройте приложение Word , а затем импортируйте исходный документ.
2. Запустите редактор VBA.
3. Вставьте новый модуль.
4. Введите^(Enter) код VBA для извлечения адреса электронной почты.
5. Запустите код VBA , чтобы извлечь все адреса электронной почты.

Сначала откройте приложение 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 iѕ 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

• Как использовать Linked Text в Word для обновления нескольких документов

• Как управлять Document Versions в Word

• Как использовать Mail Merge для Letters в Word

• Как использовать Measurement Converter в Microsoft Office

• Fix Yellow Triangle с Exclamation Point в Excel or Word

• FocusWriter - бесплатный отвлекательный Word Processor для Writers

• Word Открытие документов в WordPad вместо Word

• Что такое ASD file и как его открыть в Microsoft Word?

• Как сделать один page landscape в Word

• Word открывает документы в режиме только для чтения в Windows 10

• Convert Word Документы до JPG Использование Batch Word до JPG Converter

• Файл не может быть открыт, потому что есть проблемы с содержанием

• Увеличьте количество последних файлов в Word, Excel, PowerPoint

• Как изменить по умолчанию File Format для сохранения в Word, Excel, PowerPoint

• Как сделать флаер в Microsoft Word