使用VBA编程，无法正确插入复制的单元格

Question

 For Each tbl In docTarget.Tables
                ' 遍历表格中的每个单元格
                For Each cell In tbl.Range.Cells
                    If InStr(cell.Range.Text, "Title11") > 0 Then
                        targetRowIndex = cell.row.Index
                        Set targetTable = tbl
                        foundTarget = True
                        Exit For
                    End If
                Next cell
                If foundTarget Then Exit For
            Next tbl
            
            If foundTarget Then
                ' 删除包含 "Title11" 的行
                targetTable.Rows(targetRowIndex).Delete
                
                ' 在删除的位置前插入新行
                targetTable.Rows.Add BeforeRow:=targetTable.Rows(targetRowIndex)
                
                ' 粘贴复制的行到新插入的行
                targetTable.Rows(targetRowIndex).Range.PasteAndFormat wdFormatOriginalFormatting
            End If
            
            ' 保存并关闭目标文档
            docTarget.Save
            docTarget.Close

这段代码在插入的时候无法进行正确插入