Sub Example() Dim myTable As Table Set myTable = ActiveDocument.Tables(1) myTable.Rows.Last.Select Selection.InsertRowsBelow 1 End Sub 用ActiveDocument.Tables(1).Rows.Add好像也行,不知两者的效果有没有区别。 ActiveDocument.Tables(1).Rows.Add方法总是在指定行的前面插入行。 如: Sub Example2() 而Selection对象可以在所选行的上方或者下方插入等量的行。 注意,Add方法也可以插入指定数量的行。 Sub Example3() 来自http://club./viewthread.php?tid=205161 |
|
来自: Excel实用知识 > 《VBA与EXCEL》