Hello VBA checkers,

i wrote a word2000 macro, where i have to put two tables together. The
problem is that the second table can have one more column than the
first. I just want to glue both tables together to one.
The following code does this job, but it is very slow. I'd like to
connect two tables with over 1000 rows:

'add one row, on this row the new ones are added
firstTable.Rows.Add
   
For Each row In secondTable.Rows
       
   firstTable.Rows(firstTable.Rows.Count).Range.FormattedText =
row.Range.FormattedText
       
Next

'remove last row, its empty
firstTable.Rows(firstTable.Rows.Count).Delete

Did someone knows a better, and faster way to do this job?

Thanks, in advance

Sebastian