Добавить строку в таблице во Writer из VB6

Есть шаблон, в нем шапка таблицы и на последней ячейке заголовка стоит закладка "Table"Задача минимум - добавить новую строку таблицы, используя для этого VB6 (я так понял, что нужно использовать команду диспетчера JumpToNextCell)Кодim arg()Dim service As ObjectDim desktop As ObjectDim document As ObjectDim bookmark As Object Set service = CreateObject("com.sun.star.ServiceManage r")Set desktop = service.CreateInstance("com.sun.star.fra me.Desktop")Set document = desktop.loadComponentFromURL("file:///" & Replace(App.Path, "\", "/") & "/Шаблоны/order.dot", "_blank", 0, arg()) Set bookmark = document.getBookmarks().getByName("Table ")Dim dispatcher As ObjectSet dispatcher = service.CreateInstance("com.sun.star.fra me.DispatchHelper")Call dispatcher.executeDispatch(service, ".uno:JumpToNextCell", "", 0, arg())На последней строке возникает ошибка 13 Type mismatch. В чем ошибка?