This page[
^] shows how to add a new table at the end of a word document.
And also try adding a new paragraph for each new table - this VBA code creates a new document with two tables:
Sub Test()<br /> Dim NewDoc As Document<br /> Dim NewTable As Table<br /> Set NewDoc = Application.Documents.Add(, , , True)<br /> <br /> Set MyRange = NewDoc.Content<br /> MyRange.Collapse Direction:=wdCollapseEnd<br /> Set NewTable = NewDoc.Tables.Add(Range:=MyRange, NumRows:=6, NumColumns:=10)<br /> NewTable.Borders.OutsideLineStyle = wdLineStyleTriple<br /> <br /> NewDoc.Paragraphs.Add<br /> Set MyRange = NewDoc.Content<br /> MyRange.Collapse Direction:=wdCollapseEnd<br /> Set NewTable = NewDoc.Tables.Add(Range:=MyRange, NumRows:=6, NumColumns:=4)<br /> NewTable.Borders.OutsideLineStyle = wdLineStyleTriple<br />End Sub