从Excel到Word的VBA添加表格中的表格与合并的单元格

我已经遍布互联网寻找解决我的问题，但没有答案。 我想要做的是使用Excel VBA在Word表格中插入一行。 该表包含我想要插入行的区域之外的一些合并的单元格。 我会做一个没有合并单元格的表格是这样的：

Dim WrdApp As Word.Application Dim docPA As Word.Document Dim tabelWord As Word.Table Set WrdApp = GetObject(, "word.Application") Set docPA = WrdApp.Documents.Open(Application.ActiveWorkbook.Path & "\TabeleCopyV3.doc") Set tabelWord = docPA.Bookmarks("TabelSOPotential").Range.Tables(1) tabelWord.Rows(2).Select WrdApp.Selection.InsertRowsAbove (5) 

这适用于没有合并单元格的表格。 但是，如果表格甚至有2个合并的单元格（在我想要插入数据的区域之外），则select不会发生。 我甚至不能使用这个代码寻址表格单元格：

 tabelWord.Rows(2).Cells(1).Range.text = "text" 

我可以解决单元格的问题的唯一方法就是使用这个代码：

 tabelWord.cell(2, 1).Range.text = "text" 

这样我设法删除这样的行：

 tabelWord.cell(2, 1).Delete ShiftCells:=wdDeleteCellsEntireRow 

但是，我怎么这样插入行呢？ 谢谢！