U ovom ćemo vam članku predstaviti 2 načina za izdvajanje svih adresa e-pošte u Word dokumentu i njihovo spajanje za skupnu obradu.
S vremena na vrijeme, možda ćete morati poslati e-poštu većem broju osoba odjednom. Međutim, stvari mogu postati malo zamršene kada su njihove adrese razbacane po dugom dokumentu na stranicama. Kretanje cijelim dokumentom i pronalaženje jednog po jednog može oduzimati puno vremena. Zbog toga vam želimo pokazati brzi način da ih sve izdvojite jednim potezom za skupnu obradu u vašem poštanskom sandučiću.
Metoda 1: Koristite opciju "Pronađi i zamijeni".
- Prvo i najvažnije, otvorite dokument koji sadrži adrese e-pošte.
- Zatim započinjemo klikom na karticu "Početna".
- Zatim kliknite naopako okrenuti trokut na ikoni "Traži".
- Na padajućem popisu odaberite "Napredno traženje".
- Sada ćete imati otvoren dijaloški okvir "Pronađi i zamijeni". Provjerite je li kartica "Traži" uključena i unesite "[Az,0-9]{1,}\@[Az,0-9,\.]{1,}" u tekstualni okvir "Pronađi što".
- Zatim kliknite "Više" za prikaz više opcija.
- Zatim potvrdite okvir "Koristi zamjenske znakove" pod "Opcijama pretraživanja".
- Pritisnite gumb "Traži u" i odaberite "Glavni dokument".
- Sada možete vidjeti da su sve adrese e-pošte u ovom dokumentu označene. Zatvorite dijaloški okvir.
- Zatim kliknite "Kopiraj" u grupi "Međuspremnik" na kartici "Početna".
- Sada izradite novi Word dokument.
- Desnom tipkom miša kliknite novi i odaberite "Zadrži samo tekst". Vidjet ćete da su sve adrese e-pošte zalijepljene tamo u stupcu.
- Zatim kliknite "Zamijeni" u grupi "Uređivanje" pod karticom "Početna".
- U “Pod karticom “Zamijeni” unesite “^p” i “;” u tekstnim okvirima "Pronađi što" i "Zamijeni sa".
- I ne zaboravite poništiti okvir "Koristi zamjenske znakove".
- Zatim kliknite gumb "Zamijeni sve". Word će vam reći koliko je zamjena napravio i možete zatvoriti sve otvorene okvire. Na dokumentu su adrese e-pošte odvojene točkom i zarezom.
- Ono što trebate učiniti na kraju je kopirati te adrese u svoj poštanski sandučić i poslati iste informacije svim primateljima odjednom.
Metoda 2: Koristite VBA kodove
- Prvo pritisnite “Alt+F11” da biste otvorili VBA editor.
- Zatim na područje za uređivanje zalijepite sljedeće kodove:
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
- Zatim pritisnite gumb "Pokreni".
Zatim ćete imati još jedan novi dokument sa svim adresama e-pošte tamo, odvojenim točka-zarezom. I možete ih početi koristiti za skupnu obradu u poštanskom sandučiću.
Iskoristite vrijeme za vraćanje oštećenih datoteka
Istina, uvijek možete pronaći neka iznenađenja kroz rad s Wordom. Iako ste zadivljeni njegovim mogućnostima, trebali biste pripaziti na moguća rušenja koja Word može pretrpjeti. S jedne strane, to zaustavlja vaš rad. S druge strane, još veća prijetnja može nastati kada se Word sruši. A pod većom prijetnjom mislimo na vaše ugrožene datoteke i nezamjenjive podatke.
Stoga vam i dalje predlažemo da napravite sigurnosne kopije i, što je najvažnije, da nabavite program za popraviti oštećenje Worda tako da nećete gubiti vrijeme na petljanje.
Uvod za autora:
Vera Chen stručnjakinja je za oporavak podataka u DataNumen, Inc., koji je svjetski lider u tehnologijama za oporavak podataka, uključujući xls alat za rješavanje problema i pdf popraviti softverske proizvode. Za više informacija posjetite www.datanumen.com









