如何用vba给一个word表格的最后插入一行

用ActiveDocument.Tables(1).Rows.Add好像也行，不知两者的效果有没有区别。

ActiveDocument.Tables(1).Rows.Add方法总是在指定行的前面插入行。

如：山液世

Sub Example2()

Dim myTable As Table, myLastRow As Row

Set myTable = Me.Tables(1)

Set myLastRow = myTable.Rows.Last

myTable.Rows.Add myLastRow

End Sub

而Selection对象可以在所选行的上方或者下方插入等量的行。

注意，Add方法也可以插入逗肢指定埋迟数量的行。

Sub Example3()

Dim myTable As Table, myRows As Rows

Set myTable = Me.Tables(1)

Set myRows = Me.Range(myTable.Rows(1).Range.Start, myTable.Rows(3).Range.End).Rows

myTable.Rows.Add myRows

End Sub

步骤

打开word，先设置一个简单的表格。

一、向下添加多行（多列和其他方向类似）。

1.先选中一隐姿散行册世，然后在选中行上点击右键，在d出的菜单中，依次选择“插入”-“在下方插入行”，那么就成功添加了一行了。

2如果选择两行灶氏，继续重复第一步 *** 作，就一次性插入了两行。这种方法就是选中多少行就能新增多少行。

1、打开文档中的表格原件，用鼠标选中插入行的相邻的行，然后单击鼠标右键，在d出的菜单中，选择【插入】选项卡，差拆缓例如选择【在上方插入行】

2、虚模用鼠标选中需要插入列的相邻的列，例如，选择第二列，点击鼠标右键，在d出的菜单中，选择【插入】选项，在其出现的从下拉菜单中选择需要插御纯入的位置，例如选取【在右侧插入列】

3、在表格中用鼠标选中要插入的行，列的相邻的行，列，点击鼠标右键，选择【插入】选项卡，在出现的下拉菜单中单击【插入单元格】命令，根据自己的需要在d出的对话框中插入整行，整列，也可以改变单元格的位置，然后点击【确定】

---