Πώς να εξαγάγετε τις διευθύνσεις email από το έγγραφο του Word
Ακολουθεί ένα σεμινάριο για την εξαγωγή όλων των διευθύνσεων email από έγγραφα του Word(extract all email addresses from Word documents) στα Windows 11/10 . Εάν έχετε έγγραφα του Word ( DOC , DOCX ) με πολλές διευθύνσεις email και θέλετε να χρησιμοποιήσετε αυτές τις διευθύνσεις email για οποιοδήποτε σκοπό, θα είναι πραγματικά κουραστικό να τις αναζητήσετε με μη αυτόματο τρόπο. Μια ευκολότερη λύση για εσάς είναι να εξαγάγετε όλες τις διευθύνσεις email από το έγγραφο και στη συνέχεια να τις χρησιμοποιήσετε όπως θέλετε. Τώρα, για να εξαγάγετε διευθύνσεις email από έγγραφα του Word , δεν χρειάζεστε λύση τρίτων. Σε αυτό το άρθρο, θα δείξω δύο απλά κόλπα για την εξαγωγή διευθύνσεων email από έγγραφα του Word . Μπορείτε να το κάνετε στο Microsoft Wordεφαρμογή. Ας δούμε τώρα τις μεθόδους!
Πώς να εξαγάγετε τις διευθύνσεις email(Email Addresses) από το έγγραφο του Word
Ακολουθούν οι δύο μέθοδοι για να εξαγάγετε όλες τις διευθύνσεις email από ένα έγγραφο του Word στα Windows 11/10 :
- Εξαγάγετε(Extract) διευθύνσεις email χρησιμοποιώντας την επιλογή Advanced Find στο MS Word .
- Χρησιμοποιήστε(Use VBA) τον κώδικα VBA για να εξαγάγετε όλες τις διευθύνσεις email από ένα έγγραφο του Word .
Ας μιλήσουμε για αυτές τις μεθόδους λεπτομερώς!
1] Εξαγωγή(Extract) διευθύνσεων email χρησιμοποιώντας την επιλογή Advanced Find στο MS Word
Μπορείτε να χρησιμοποιήσετε την επιλογή Advanced Find/ Find και αντικατάσταση στο Microsoft Word για να εξαγάγετε όλες τις διευθύνσεις email από έγγραφα του Word . Εδώ είναι τα κύρια βήματα για να το κάνετε:
- Εκκινήστε το Microsoft Word.
- Ανοίξτε ένα έγγραφο του Word που περιέχει διευθύνσεις email.
- Μεταβείτε στην επιλογή Find > Advanced Find .
- Εισαγάγετε μια συμβολοσειρά στο πεδίο Find what.
- Ενεργοποιήστε το πλαίσιο ελέγχου Χρήση χαρακτήρων μπαλαντέρ.
- Κάντε κλικ(Click) στο κουμπί Εύρεση(Find) σε > Main Document .
- Επιστρέψτε στο κύριο έγγραφο και χρησιμοποιήστε την επιλογή Αντιγραφή(Copy) .
- Δημιουργήστε ένα νέο κενό έγγραφο και επικολλήστε τις αντιγραμμένες διευθύνσεις email.
Τώρα, ας αναλύσουμε αυτά τα βήματα τώρα!
Αρχικά, εκτελέστε την εφαρμογή Microsoft Word στον υπολογιστή σας και, στη συνέχεια, εισαγάγετε ένα έγγραφο του Word που περιέχει τις διευθύνσεις email που θέλετε να εξαγάγετε.
Τώρα, στην καρτέλα Αρχική(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Θα αντιγράψει όλες τις διευθύνσεις email που υπάρχουν στο έγγραφο του Word στο πρόχειρο.
Στη συνέχεια, δημιουργήστε ένα κενό έγγραφο του Word ή ανοίξτε την εφαρμογή Σημειωματάριο(Notepad) και απλώς επικολλήστε τις αντιγραμμένες διευθύνσεις email χρησιμοποιώντας την αποκλειστική επιλογή ή το πλήκτρο πρόσβασης Ctrl + V
Τώρα μπορείτε να αποθηκεύσετε το έγγραφο με τις εξαγόμενες διευθύνσεις email από το έγγραφο του Word και να χρησιμοποιήσετε τις διευθύνσεις email όπως θέλετε.
Διαβάστε(Read) : Πώς να απενεργοποιήσετε το Splash Screen σε προγράμματα του Office .
2] Χρησιμοποιήστε(Use VBA) τον κώδικα VBA για να εξαγάγετε όλες τις διευθύνσεις email από ένα έγγραφο του Word
Μπορείτε επίσης να χρησιμοποιήσετε έναν απλό κώδικα της Visual Basic for Applications ( VBA ) για να εξαγάγετε όλες τις διευθύνσεις email από έγγραφα του Word . Εδώ είναι τα κύρια βήματα για να το κάνετε:
- Ανοίξτε την εφαρμογή Word και, στη συνέχεια, εισαγάγετε το έγγραφο προέλευσης.
- Εκκινήστε το VBA Editor.
- Εισαγάγετε μια νέα μονάδα.
- Εισαγάγετε(Enter) τον κωδικό VBA για εξαγωγή διεύθυνσης email.(VBA)
- Εκτελέστε τον κώδικα VBA για να εξαγάγετε όλες τις διευθύνσεις email.
Αρχικά, ανοίξτε την εφαρμογή Word και, στη συνέχεια, εισαγάγετε το έγγραφο εισόδου του Word από το οποίο θέλετε να εξαγάγετε όλες τις διευθύνσεις email.
Τώρα, εκκινήστε το πρόγραμμα επεξεργασίας VBA(VBA Editor) χρησιμοποιώντας το συνδυασμό Alt + F11 . Εάν έχετε ενεργοποιήσει την καρτέλα Developers στην κύρια κορδέλα, μπορείτε να μεταβείτε στην καρτέλα Developer και να κάνετε κλικ στην επιλογή Visual Basic για να ανοίξετε το VBA Editor.
Στη συνέχεια, στο παράθυρο 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 με όλες τις εξαγόμενες διευθύνσεις email από το έγγραφο του (Word)Word .
Μπορείτε απλώς να αποθηκεύσετε το έγγραφο με εξαγόμενες διευθύνσεις email και να τις χρησιμοποιήσετε όπως απαιτείται.
Καθώς το Microsoft Word(Microsoft Word) υποστηρίζει μια ποικιλία μορφών εγγράφων, αυτές οι μέθοδοι εξαγωγής διευθύνσεων email μπορούν να χρησιμοποιηθούν και για έγγραφα που δεν ανήκουν στο Word, όπως XML , ODT κ.λπ.
Διαβάστε τώρα: (Now read:) Εξαγωγή διευθύνσεων email χρησιμοποιώντας το Easy Email Extractor.(Extract email addresses using Easy Email Extractor.)
Related posts
Πώς να δημιουργήσετε προσωρινές διευθύνσεις email με το YOPmail
Τρόπος χρήσης των Προτάσεων Επανεγγραφής στην εφαρμογή Word για Web
Το Excel, το Word ή το PowerPoint δεν μπόρεσαν να ξεκινήσουν την τελευταία φορά
Πώς να δημιουργήσετε ένα φυλλάδιο ή ένα βιβλίο με το Microsoft Word
Πώς να απενεργοποιήσετε τα σημάδια παραγράφου στο Microsoft Word
Αφαιρέστε το φόντο μιας εικόνας με το Microsoft Word
Τι είναι ένα αρχείο ASD και πώς να το ανοίξετε στο Microsoft Word;
Πώς να δημιουργήσετε μια αναπτυσσόμενη λίστα στο Word
Πώς να χρησιμοποιήσετε τη συγχώνευση αλληλογραφίας για γράμματα στο Word
Προσθήκη, Αλλαγή, Αφαίρεση Συντάκτη από Ιδιότητα Συντάκτη στο έγγραφο του Office
Πώς να σχεδιάσετε στο Microsoft Word χρησιμοποιώντας τα εργαλεία της καρτέλας Σχέδιο
Πώς να εισαγάγετε κείμενο σε σχήμα στο Word
Μετατρέψτε έγγραφα Word σε JPG χρησιμοποιώντας Μαζική μετατροπή Word σε JPG
Πώς να εισαγάγετε μουσικές νότες και σύμβολα στο έγγραφο του Word
Πώς να χρησιμοποιήσετε το Συνδεδεμένο κείμενο στο Word για την ενημέρωση πολλών εγγράφων
Διόρθωση σφάλματος, ο σελιδοδείκτης δεν έχει οριστεί στο Microsoft Word
Πώς να μετατρέψετε πίνακα σε κείμενο και κείμενο σε πίνακα στο Word
Τρόπος επικάλυψης εικόνων στο Word
Οι συντομεύσεις πληκτρολογίου δεν λειτουργούν στο Word
Πώς να δημιουργήσετε μια κρεμαστή εσοχή στο Microsoft Word και στα Έγγραφα Google