Copy table column from multiple word files into excel

[ml_thompson]

I have hundreds of word files in a folder. Each file contains a table with
two columns. I want to copy the right most column from each word file into 1
excel worksheet, but opening each word file individually and copy/pasting
will take me forever. Does anyone have code the will open each file in the
folder, copy the column and past it into the next availble column in an excel
worksheet?

Thanks,
ml

 

[Jonathan West]

I have hundreds of word files in a folder. Each file contains a table with
two columns. I want to copy the right most column from each word file
into 1
excel worksheet, but opening each word file individually and copy/pasting
will take me forever. Does anyone have code the will open each file in
the
folder, copy the column and past it into the next availble column in an
excel
worksheet?

Thanks,
ml

You can probably adapt the code in this article

Find & ReplaceAll on a batch of documents in the same folder
http://www.word.mvps.org/FAQs/MacrosVBA/BatchFR.htm

Instead of the find-replace code in the innermost part of the loop, put in
your copy-column-and-paste-to-Excel code.


--
Regards
Jonathan West - Word MVP
www.intelligentdocuments.co.uk
Please reply to the newsgroup
Keep your VBA code safe, sign the ClassicVB petition www.classicvb.org

 

[Helmut Weber]

Hi,

to get you started:

http://word.mvps.org/faqs/macrosvba/BatchFR.htm

http://word.mvps.org/faqs/interdev/controlxlfromword.htm

--
Greetings from Bavaria, Germany

Helmut Weber, MVP WordVBA

Win XP, Office 2003
"red.sys" & Chr$(64) & "t-online.de"

 

[ml_thompson]

Thanks everyone!!! Great info. Here is a link to some code that worked great.
http://www.microsoft.com/office/com...ming&mid=28c1c1cb-4beb-42f7-9407-1c6417b0141a