Macro not picking up all tables

I realize this is an Excel forum but have a general VBA question I think. I'm trying to copy all tables in a Word document into a new document. This script is only pasting the first one, even though I can debug through it and see that the count of tables is 48 and I can watch i go from 1-48. It pastes the first one time, and then never pastes anything else again. I have a feeling it has to do with either selecting the table or using the correct activated document. I have only one document open at the time it runs (oDoc) and the only other one is the one that's created (oNewDoc). Any help appreciated.

Thanks!

Please Login or Register  to view this content.

Can you post a document with a few tables in it, I don't feel like guessing..
Also, note that the site has a Word forum, so the question is ok.

Did I miss the bit in the code where the copying occurs?

Oh OK. I've moved this to the Word programming zone in the hope that someone who knows Word VBA will happen by.

When I ran your code on a test document, it seemed to be pasting each new table on top of the previously pasted one. Therefore, try this one:

Please Login or Register  to view this content.