如何用VBA给一个WORD表格的最后插入一行

Answer 1

试下面的代码吧，还有问题的话，可以私信我。

Sub ExampleB()
    For i = 1 To ActiveDocument.Tables.Count
        ActiveDocument.Tables(i).Rows.Last.Select
        Selection.InsertRowsBelow 1
    Next
End Sub