Ответ
 
Опции вопроса Поиск в этом вопросе Опции просмотра
  #1  
Старый 29.09.2011, 23:45
Аватар для Guest
Guest
Вопрос
Сообщений: n/a
По умолчанию

Есть шаблон, в нем шапка таблицы и на последней ячейке заголовка стоит закладка "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. В чем ошибка?
Ответить с цитированием
Ответ



Похожие вопросы
Тема Автор Раздел Ответов Последний вопрос или ответ
Как скопировать целую строку в таблице BASE и вставить ее в новую строку? Guest Продолжение старого архива 0 01.10.2011 03:01
Выделить строку в таблице Writer Guest Новый архив 3 0 30.09.2011 00:21
OOo Writer. Как программно удалить строку ? Guest Продолжение нового архива 0 30.09.2011 00:04
Builder,OLE,Writer – добавить строку в таблицу [РЕШЕНО] Guest Новый архив 3 0 29.09.2011 23:55
Количество столбцов в строке в таблице Writer Guest Новый архив 2 0 29.09.2011 23:03



© www.otvetnemail.ru - Форум вопросов и ответов.