V tomto článku vám predstavíme dva spôsoby, ako extrahovať všetky e-mailové adresy v dokumente Word a spojiť ich pre dávkové spracovanie.
Občas budete možno musieť poslať e-mail viacerým osobám naraz. Veci však môžu byť trochu komplikované, keď sú ich adresy roztrúsené po dlhom dokumente na stránkach. Navigovať v celom dokumente a nájsť ich jeden po druhom môže byť časovo náročné. Preto vám chceme ukázať rýchly spôsob, ako všetky extrahovať jedným ťahom na hromadné spracovanie vo vašej poštovej schránke.
Metóda 1: Použite možnosť „Nájsť a nahradiť“
- Najprv otvorte dokument obsahujúci e-mailové adresy.
- Potom začneme kliknutím na kartu „Domov“.
- Ďalej kliknite na prevrátený trojuholník na ikone „Nájsť“.
- V rozbaľovacom zozname zvoľte možnosť „Rozšírené vyhľadávanie“.
- Teraz budete mať otvorené dialógové okno „Nájsť a nahradiť“. Uistite sa, že je zapnutá karta „Nájsť“, a do textového poľa „Nájsť čo“ zadajte „[Az, 0-9] {1,} \ @ [Az, 0-9, \.] {1,}“.
- Ďalej kliknite na „Viac“, aby ste zobrazili viac možností.
- Potom začiarknite políčko „Použiť zástupné znaky“ v časti „Možnosti vyhľadávania“.
- Kliknite na tlačidlo „Nájsť v“ a vyberte „Hlavný dokument“.
- Teraz môžete vidieť, že boli zvýraznené všetky e-mailové adresy v tomto dokumente. Zatvorte dialógové okno.
- Ďalej kliknite na „Kopírovať“ v skupine „Schránka“ na karte „Domov“.
- Teraz vytvorte nový dokument programu Word.
- Kliknite pravým tlačidlom myši na nový a vyberte možnosť „Ponechať iba text“. V stĺpci uvidíte všetky e-mailové adresy, ktoré sú tam vložené.
- Potom kliknite na tlačidlo „Nahradiť“ v skupine „Úpravy“ na karte „Domov“.
- Na karte „Nahradiť“ zadajte „^ p“ a „;“ v textových poliach „Nájsť čo“ a „Nahradiť za“.
- A nezabudnite vyčistiť políčko „Použiť zástupné znaky“.
- Potom kliknite na tlačidlo „Nahradiť všetko“. Aplikácia Word vám povie, koľko nahradení vykonala, a môžete zavrieť všetky otvorené políčka. V dokumente sú e-mailové adresy oddelené bodkočiarkami.
- Nakoniec musíte tieto adresy skopírovať do svojej poštovej schránky a odoslať rovnaké informácie všetkým príjemcom naraz.
Metóda 2: Použite kódy VBA
- Najskôr stlačte „Alt + F11“, aby ste otvorili editor VBA.
- Potom do oblasti úprav prilepte nasledujúce kódy:
Sub ExtractAllEmailAddressesFromDocument()
Dim strEmailAddresses As String
' Find all email addresses in a document,and Extract them.
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
- Ďalej stlačte tlačidlo „Spustiť“.
Potom budete mať ďalší nový dokument so všetkými e-mailovými adresami oddelenými bodkočiarkami. A môžete ich začať používať na dávkové spracovanie v poštovej schránke.
Využite čas na získanie poškodených súborov
Je pravda, že pri práci s Wordom môžete vždy nájsť nejaké prekvapenie. Aj keď ste ohromení jeho schopnosťami, mali by ste si dávať pozor na možné zlyhania, ktoré môže Word utrpieť. Na jednej strane to zastaví vašu prácu. Na druhej strane, ešte väčšia hrozba môže byť výzva, keď sa Word zrúti. A pod väčšou hrozbou máme na mysli vaše napadnuté súbory a nenahraditeľné dáta.
Preto vám stále odporúčame robiť si zálohy a čo je najdôležitejšie, zaobstarať si program na opraviť poškodenie slova takže nebudete strácať čas zbytočnými rozruchmi.
Úvod autora:
Vera Chen je expertka na obnovu dát v DataNumen, Inc., ktorá je svetovým lídrom v oblasti technológií obnovy dát, vrátane xls problém opraviť nástroj a pdf oprava softvérových produktov. Pre viac informácií navštívte www.datanumen. S