Converting table to csv automatically...

[Artco News]

Hi, I'm in a bit of issues here in converting my Word 2002 table into csv
text file.

I have 40 Word Documents each with a table in the document.

What I'd like to do is to convert all those document into a csv with
delimiter(i'm using a caret - ^ - sign as delimiter). So far I can only do
it manually as follows:

- open the word document
- select table
- convert table -> table to text (select delimiter)
- save it to a different text file.

Perhaps I can do this automatically thru a word basic.

Please advice. Thanks

 

[Phill. W]

.. . .

So far I can only do it manually as follows:

- open the word document
- select table
- convert table -> table to text (select delimiter)
- save it to a different text file.

The Macro Recorder is your friend.
[Just about] Anything you can do manually, it can record and do
for you automatically...

HTH,
Phill W.

 

[Useko Netsumi]

But it can only within a word document, isn't it? I have over 130 documents
with table inside to convert . Thanks

. . .

So far I can only do it manually as follows:

- open the word document
- select table
- convert table -> table to text (select delimiter)
- save it to a different text file.

The Macro Recorder is your friend.
[Just about] Anything you can do manually, it can record and do
for you automatically...

HTH,
Phill W.

 

[Harold]

This should work.
Loop the tables collection and convert each to text
Sub foo()

Application.DefaultTableSeparator = "^"
Do While ActiveDocument.Tables.Count > 0
ActiveDocument.Tables(1).ConvertToText
Separator:=wdSeparateByDefaultListSeparator, _
NestedTables:=True
Loop
End Sub