Šajā rakstā mēs iepazīstināsim jūs ar 2 veidiem, kā iegūt visas e-pasta adreses Word dokumentā un sasaistīt tos pakešu apstrādei.
Šad un tad jums, iespējams, būs jānosūta e-pasts vairākām personām vienlaikus. Tomēr lietas var kļūt nedaudz sarežģītas, ja viņu adreses lapās izkaisās pa garu dokumentu. Pārvietoties pa visu dokumentu un atrast tos pa vienam, var būt laikietilpīgi. Tāpēc mēs vēlamies jums parādīt ātru veidu, kā visus iegūt vienā kustībā, lai pastkastē veiktu sērijveida apstrādi.
1. metode: izmantojiet opciju “Atrast un aizstāt”
- Pirmkārt un galvenokārt, atveriet dokumentu, kurā ir e-pasta adreses.
- Pēc tam mēs sākam, noklikšķinot uz cilnes “Sākums”.
- Pēc tam izvēlieties noklikšķiniet uz otrādi augšpusē esošā trīsstūra uz ikonas “Atrast”.
- Nolaižamajā sarakstā izvēlieties “Advanced Find”.
- Tagad jums būs atvērts dialoglodziņš “Atrast un aizstāt”. Pārliecinieties, vai ir ieslēgta cilne “Atrast”, un tekstlodziņā “Atrast ko” ievadiet “[Az, 0-9] {1,} \ @ [Az, 0-9, \.] {1,}”.
- Pēc tam noklikšķiniet uz “Vairāk”, lai skatītu citas iespējas.
- Pēc tam sadaļā “Meklēšanas opcijas” atzīmējiet izvēles rūtiņu “Izmantot aizstājējzīmes”.
- Noklikšķiniet uz pogas Atrast un atlasiet Galvenais dokuments.
- Tagad jūs varat redzēt, ka visas šī dokumenta e-pasta adreses ir iezīmētas. Aizveriet dialoglodziņu.
- Pēc tam cilnes “Sākums” grupā “Starpliktuve” noklikšķiniet uz “Kopēt”.
- Tagad izveidojiet jaunu Word dokumentu.
- Ar peles labo pogu noklikšķiniet uz jaunā un izvēlieties “Saglabāt tikai tekstu”. Kolonnā redzēsit visas e-pasta adreses.
- Pēc tam cilnes “Sākums” grupā “Rediģēšana” noklikšķiniet uz “Aizstāt”.
- Cilnē “Aizstāt” ievadiet “^ p” un “;” attiecīgi tekstlodziņos “Atrast ko” un “Aizstāt ar”.
- Un atcerieties notīrīt lodziņu “Izmantot aizstājējzīmes”.
- Pēc tam noklikšķiniet uz pogas “Aizstāt visu”. Word jums pateiks, cik daudz aizstājēju tas ir veicis, un jūs varat aizvērt visas atvērtās rūtiņas. Dokumentā ir e-pasta adreses, atdalītas ar semikoliem.
- Visbeidzot, jums ir jādara šīs adreses kopija uz jūsu pastkasti un jānosūta tā pati informācija visiem uztvērējiem vienlaikus.
2. metode: izmantojiet VBA kodus
- Pirmkārt, nospiediet “Alt + F11”, lai atvērtu VBA redaktoru.
- Pēc tam rediģēšanas apgabalā ielīmējiet šādus kodus:
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
- Nākamais nospiediet pogu “Palaist”.
Pēc tam jums būs vēl viens jauns dokuments ar visām e-pasta adresēm, atdalītām ar semikolu. Un jūs varēsiet sākt tās izmantot partijveida apstrādei pastkastītē.
Izmantojiet laiku, lai iegūtu bojātus failus
Tiesa, strādājot ar Word, vienmēr var atrast dažus pārsteigumus. Kamēr jūs esat pārsteigts par tā iespējām, jums vajadzētu uzmanīties no iespējamām avārijām, kuras Word var ciest. No vienas puses, tas pārtrauc jūsu darbu. No otras puses, vēl lielāki draudi var izraisīt, kad Word sabrūk. Un ar lielākiem draudiem mēs domājam jūsu apdraudētos failus un neaizstājamos datus.
Tāpēc mēs iesakām jums veikt dublējumus un, pats galvenais, iegūt programmu, lai labot Word bojājumus tāpēc netērēsiet laiku, rosoties apkārt.
Autora ievads:
Vera Čena ir datu atkopšanas eksperte DataNumen, Inc., kas ir pasaules līderis datu atkopšanas tehnoloģiju, tostarp xls problēmu novēršanas rīks un pdf programmatūras produktu labošana. Lai iegūtu vairāk informācijas, apmeklējiet vietni www.datanumen. Ar