Выгрузка данных в libreoffice

26.03.2016
2
0
#1
Из Lotus в MS Excel выгружались данные, дорожка протоптана. Перешли на LibreOffice, нужно переписать код, получается, но есть загвоздка - данные надо выгружать в подготовленный шаблон и я не могу заставить Либру открыть файл таким образом:
Doc = starDeskTop.loadComponentFromURL(""C://Temp/test.xls "_blank", 0, oArg)
Ругается. Все синтаксисы перебрал, слэши менял на обратные, протокол указывал file://, файл указывал родного формата - не получается. Windows 7.
Может кто сталкивался, помогите пожалуйста.
 
26.03.2016
2
0
#2
Всё, проблема решена:

Dim args()

Path = "c:\Temp\cat.ods"
Path = Replace(Path, "\", "/")
Path = Replace(Path, ":", "|")
Path = "file:///" & Path

Set objDocument= objDesktop.loadComponentFromURL(Path,"_blank" , 0, args)