добавление строки в таблицу из другого приложения

[R Dmitry]

Добрый день, уважаемые Wordчане
запнулся на такой задаче и ни как не могу ее решить.
программно добавляю строку в таблице созданного из шаблона документа,
но ни как не реагирует на мои старания.
вроде все отрабатывает, данные вставляет и в таблицу тоже.
строку таблицы выделяет, а добавить не добавляет
вот пример из работы excel:

Sub WAPP()
Dim app As Word.Application
Dim strDOT As String, x&
x=5
     strDOT = ThisWorkbook.Path & "\" & "WDOC.dot"
         Set app = New Word.Application
         app.Visible = True
         app.Documents.Add strDOT
       With app.ActiveDocument
         .Bookmarks("dt_start").Range.Text = "25"
         .Bookmarks("dt_fin").Range.Text = "54654"
         .Tables(1).Rows(1).Select
          Selection.InsertRowsBelow x
        End With
End Sub

[R Dmitry]

можно закрывать, правильно так

app.Selection.InsertRowsBelow x