如何在Word中用VBA在另一个表后插入表？

Question

我想在Word中用VBA插入一个表后，再插入一个表，我有一个按钮，点击它应该会导致插入一些新的表（有边框，充满文字），在按钮下有五个表行。我有一个按钮，点击它应该导致插入一些新的表（与边框，充满了文字）五个表行下的按钮。我已经尝试了一些例子，比如

Selection.MoveDown Unit:=wdLine, Count:=5
With ThisDocument
Set table1 = .Tables.Add(.Range(Start:=myInt, End:=myInt), 2, 7)
End With
table1.Rows(1).Cells(1).Range = "text"
table1.Borders.OutsideLineStyle = wdLineStyleSingle
table1.Borders.InsideLineStyle = wdLineStyleSingle 

它制作了带边框的表格，但它被插入到文档的开头，我需要它在所选单元格下面5行。我不知道如何指定myInt将表格放在5行以下。

也许有其他方法可以做到这一点。

Answer 1

试试

Set table1 = .Tables.Add(Selection.Range, 2, 7)

但如果可以的话，你最好不要使用 "选择"。