每当行填满后，如何在WORD表中自动创建另一行？

Question

我目前正在手动逐行输入数据。例如。

objTable.Cell(1,2).Range.Text = "A"
objTable.Cell(2,2).Range.Text = "B"
objTable.Cell(3,2).Range.Text = "C"

有没有办法让他们循环播放？ 最终产品应为

objTable.Cell(x,2).Range.Text = "A"
objTable.Cell(x,2).Range.Text = "B"
objTable.Cell(x,2).Range.Text = "C"

Answer 1

如果我们已经创建了一个表，只需使用以下代码创建新行：

existedTable.Rows.Last.Select

Selection.InsertRowsBelow 1