Cách trích xuất Địa chỉ Email từ tài liệu Word

Đây là hướng dẫn trích xuất tất cả địa chỉ email từ tài liệu Word(extract all email addresses from Word documents) trong Windows 11/10 . Nếu bạn có tài liệu Word ( DOC , DOCX ) với nhiều địa chỉ email và bạn muốn sử dụng những địa chỉ email đó cho bất kỳ mục đích nào, thì việc tìm kiếm chúng theo cách thủ công sẽ thực sự mệt mỏi. Một giải pháp dễ dàng hơn cho bạn là trích xuất tất cả các địa chỉ email từ tài liệu và sau đó sử dụng chúng như bạn muốn. Giờ đây, để trích xuất địa chỉ email từ tài liệu Word , bạn không cần bất kỳ giải pháp nào của bên thứ ba. Trong bài viết này, tôi sẽ trình bày hai thủ thuật đơn giản để trích xuất địa chỉ email từ tài liệu Word . Bạn có thể làm như vậy trong Microsoft Wordứng dụng. Hãy để chúng tôi kiểm tra các phương pháp ngay bây giờ!

Cách trích xuất Địa chỉ Email(Email Addresses) từ tài liệu Word

Dưới đây là hai phương pháp để trích xuất tất cả địa chỉ email từ tài liệu Word trong Windows 11/10 :

  1. Trích xuất(Extract) địa chỉ email bằng tùy chọn Tìm nâng cao(Advanced Find) trong MS Word .
  2. Sử dụng mã VBA(Use VBA) để trích xuất tất cả các địa chỉ email từ tài liệu Word .

Hãy để chúng tôi nói về các phương pháp này một cách chi tiết!

1] Trích xuất(Extract) địa chỉ email bằng tùy chọn Tìm nâng cao(Advanced Find) trong MS Word

Bạn có thể sử dụng tùy chọn Advanced Find/ Find và thay thế Nâng cao trong Microsoft Word để trích xuất tất cả các địa chỉ email từ tài liệu Word . Dưới đây là các bước chính để làm như vậy:

  1. Khởi chạy Microsoft Word.
  2. Mở tài liệu Word có chứa địa chỉ email.
  3. Đi tới tùy chọn Find > Advanced Find .
  4. Nhập một chuỗi vào trường Tìm(Find) gì.
  5. Bật hộp kiểm Sử dụng ký tự đại diện.
  6. Bấm(Click) vào nút Tìm(Find) trong > Main Document .
  7. Quay lại tài liệu chính và sử dụng tùy chọn Sao chép(Copy) .
  8. Tạo một tài liệu trống mới và dán các địa chỉ email đã sao chép.

Bây giờ, chúng ta hãy trình bày chi tiết các bước này ngay bây giờ!

Trước tiên, hãy chạy ứng dụng Microsoft Word trên PC của bạn, sau đó nhập tài liệu Word có chứa địa chỉ email mà bạn muốn trích xuất.

Bây giờ, trong tab Trang chủ , hãy chuyển đến phần (Home)Chỉnh sửa(Editing) và nhấp vào nút thả xuống Tìm . ( Find)Sau đó, nhấn vào tùy chọn Tìm kiếm nâng cao(Advanced Find) . Thao tác này sẽ mở ra hộp thoại Tìm và Thay thế .(Find and Replace)

Cách trích xuất Địa chỉ Email từ tài liệu Word

Trong hộp thoại Tìm và Thay thế(Find and Replace) , từ tab Tìm , nhập chuỗi (Find)[A-z,0-9]{1,}\@[A-z,0-9,\.]{1,} vào trường Tìm gì(Find what) .

Sau đó, nhấn nút More sẽ mở ra nhiều tùy chọn khác nhau.

Tiếp theo, bật hộp kiểm Sử dụng ký tự đại diện(Use wildcards) .

Sau đó, nhấp vào nút thả xuống Tìm trong và chọn tùy chọn (Find In)Tài liệu chính(Main Document) .

Khi bạn làm điều đó, tất cả các địa chỉ thư sẽ được đánh dấu và chọn trong tài liệu Word nguồn , như được hiển thị trong ảnh chụp màn hình bên dưới.

Bây giờ những gì bạn phải làm là nhấp vào nút Sao chép(Copy) có trong tab Trang chủ . (Home)Ngoài ra, bạn cũng có thể sử dụng phím nóng sao chép, tức là phím tắt Ctrl +CNó sẽ sao chép tất cả các địa chỉ email có trong tài liệu Word vào khay nhớ tạm.

Tiếp theo, tạo một tài liệu Word trống hoặc mở ứng dụng Notepad và chỉ cần dán các địa chỉ email đã sao chép bằng tùy chọn chuyên dụng hoặc phím nóng Ctrl + V

Cách trích xuất địa chỉ email từ tài liệu Word trong Windows 11/10

Bây giờ bạn có thể lưu tài liệu với các địa chỉ email được trích xuất từ ​​tài liệu Word và sử dụng các địa chỉ email theo cách bạn muốn.

Đọc(Read) : Cách tắt Splash Screen trong các chương trình Office .

2] Sử dụng mã VBA(Use VBA) để trích xuất tất cả các địa chỉ email từ tài liệu Word

Bạn cũng có thể sử dụng mã Visual Basic for Applications ( VBA ) đơn giản để trích xuất tất cả các địa chỉ email từ tài liệu Word . Dưới đây là các bước chính để làm như vậy:

  1. Mở ứng dụng Word , sau đó nhập tài liệu nguồn.
  2. Khởi chạy VBA Editor.
  3. Chèn một mô-đun mới.
  4. Nhập(Enter)VBA để trích xuất địa chỉ email.
  5. Chạy mã VBA để trích xuất tất cả các địa chỉ email.

Đầu tiên, mở ứng dụng Word , sau đó nhập tài liệu Word đầu vào mà bạn muốn trích xuất tất cả các địa chỉ email.

Bây giờ, khởi chạy VBA Editor bằng tổ hợp Alt + F11 . Nếu bạn đã bật tab Nhà phát triển trên ruy-băng chính, bạn có thể chuyển đến tab (Developers)Nhà phát triển(Developer) và nhấp vào tùy chọn Visual Basic để mở Trình chỉnh sửa VBA.

Tiếp theo, trong cửa sổ VBA Editor , chuyển đến menu Chèn( Insert) và nhấp vào tùy chọn Mô-đun(Module) .

Sau đó, trong phần bên phải, hãy nhập mã VBA bên dưới vào cửa sổ trình chỉnh sửa:

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

Sau đó, chuyển đến menu Run và nhấp vào tùy chọn Run Macros hoặc đơn giản là phím F5. Một cửa sổ hộp thoại Macros sẽ mở ra, nơi bạn cần chọn macro đã tạo và sau đó nhấp vào nút Run .

Khi bạn nhấp vào nút Run , một tài liệu Word mới sẽ mở ra với tất cả các địa chỉ email được trích xuất từ ​​tài liệu Word .

Bạn có thể chỉ cần lưu tài liệu với các địa chỉ email đã trích xuất và sử dụng chúng theo yêu cầu.

Microsoft Word hỗ trợ nhiều định dạng tài liệu khác nhau, các phương pháp trích xuất địa chỉ email này cũng có thể được sử dụng cho tài liệu không phải Word, chẳng hạn như XML , ODT , v.v.

Bây giờ hãy đọc: (Now read:) Trích xuất địa chỉ email bằng Easy Email Extractor.(Extract email addresses using Easy Email Extractor.)



About the author

Tôi là kỹ sư phần mềm với hơn 10 năm kinh nghiệm thiết kế, xây dựng và bảo trì các ứng dụng dựa trên Windows. Tôi cũng là một chuyên gia thành thạo về xử lý văn bản, xử lý bảng tính và thuyết trình. Tôi có thể viết mô tả rõ ràng và ngắn gọn về mã, giải thích các khái niệm phức tạp cho các nhà phát triển mới làm quen và khắc phục sự cố nhanh chóng cho khách hàng.



Related posts