View Single Post
  #19   Report Post  
Posted to microsoft.public.word.docmanagement
[email protected] andreadambra@gmail.com is offline
external usenet poster
 
Posts: 9
Default How to extract email addresses from a word document or htm web page?

Thanks, On the Italian NG they helped me greatily. Now that I have the
list of e-mails.
Would you please be able to tell me to which societes I can address my
self for sending newsletter to several addresses?
Thanks and Regards

Graham Mayor ha scritto:

I haved already told you repeatedly how to extract email addresses from a
document. This string works fine for English versions of Word. I am
hampered in modifying that for Italian Word by not knowing what the correct
escape character is for the Italian version. Ask your Italian correspondents
in the other group to fix the search string so that it works in your version
i.e. what needs to replace the '\' character.

--

Graham Mayor - Word MVP

My web site www.gmayor.com
Word MVP web site http://word.mvps.org


wrote:
Thanks. On the italian NG someone gave me the right macro to have all
the e-mails in a new document.
The problem is that the macro take all the "linked e-mails" that have
an hyper-link but the e-mail addresses in my document are all in
simple text, without link.
How do I transform these addresses in hyper link addresses?
Thanks!

Graham Mayor ha scritto:

My next step would have been to direct you to the Italian Word
newsgroup -but I see that you have already found that one

--

Graham Mayor - Word MVP

My web site
www.gmayor.com
Word MVP web site http://word.mvps.org


Graham Mayor wrote:
I don't work for Microsoft - nor does anyone else answering queries
here. This is a user peer group. You have the answer at your
fingertips - the commands are explained in Word Help. The
principloes of wildcard searches are explained at
http://www.gmayor.com/replace_using_wildcards.htm

wrote:
It doesn't work...
How can I know what is the Italian thing for "\"?
You work for Microsoft and you know anyone of your colleagues in
Italy that can pass you this information?
Thanks!

Graham Mayor ha scritto:

Doug

I suspect that your macro may run into the same language issues
that the search string is having problems with i.e. the escape
character \ before the @


--

Graham Mayor - Word MVP

My web site
www.gmayor.com
Word MVP web site http://word.mvps.org


Doug Robbins - Word MVP wrote:
Run the following macro when the document containing the email
addresses is the active document
Macro to extract all of the email addresses from a document
Sub CopyAddressesToOtherDoc()

Dim Source As Document, Target As Document, myRange As Range
Set Source = ActiveDocument
Set Target = Documents.Add
Source.Activate
Selection.HomeKey Unit:=wdStory
Selection.Find.ClearFormatting
With Selection.Find
Do While .Execute(findText:="[+0-9A-z._-]{1,}\@[A-z.]{1,}", _
MatchWildcards:=True, Wrap:=wdFindStop, Forward:=True) =
True Set myRange = Selection.Range
Target.Range.InsertAfter myRange & vbCr
Loop
End With
Selection.HomeKey Unit:=wdStory
Target.Activate
End Sub


wrote in message
oups.com...
Hello,
I'm in trouble because I'm trying to find the way to extract
some e-mail addresses that are in a .doc document I have that I
also have in txt format or .htm format
The word document is several pages and he has a lot of e-mail
addresses that I cannot just copy and past with the search tool
because they are too much.
How do I do to extract all the email addresses from the word
document? Thanks!