>Hi Friends!
>
>Hi have a trouble and to be sincere, I don´t have any idea how to solve it. Somebody at the company, has a big bank of customers and contacts mail adresses. She had the great idea of write all the adresses in Word (Around 200 pages), with the format:
>
>Cotusa@prodigy.net.mx,viverdi@infosel.net.mx
>
>So, the only mark is a ",". What I need to do is separate all the adresses and write it on a table. Is it possible from Word or I need to export the data to another place?
>
>Thanks in advance!

Off the top of my head :

oWord=createobject('word.application')
with oWord
 .Documents.Open(lcMyDocument)
 .ActiveDocument.Content.Select
 .Selection.Copy
 .quit()
endwith
lnAdresses = alines(arrAdresses, _cliptext,',')

Cetin