extract text from table

M

Mr Anderson

Hi All

I have a problem.
For use iwhen I make job ads, I'd like to have a table in Word in which
users can fill in information. I'd like to be able to extract the entered
text from that table, leaving the table behind.
Does you know of an easy way to do this?

Thanksfor any help!

ChrisP
 
P

Perry

Below code outputs each cell's text to the MsgBox and clears each cell's
content from 1st table in activedocument.
But what you like to do with the value retrieved/extracted from each cell?

Dim t as word.table
Set t = activedocument.tables(1)
Dim c as Word.cell

For each c in t.range.cells
Msgbox c.range.Text
c.range.text = vbnullstring
Next

Krgrds,
Perry
 
Top