vbscript та openoffice calc

Приклад того, як можна дістати дані з openoffice calc документа за допомогою vbscript


Set objServiceManager= WScript.CreateObject(
                                   "com.sun.star.ServiceManager"
                                         )
Set StarDesktop= objServiceManager.createInstance(
                                   "com.sun.star.frame.Desktop"
                                        )
cURL = "File:///c:/test.sxc"
set oDoc = StarDesktop.loadComponentFromURL(
                                    cURL, "_blank", 0, Array()
                                       )
set oSheet = oDoc.getSheets().getByName( "Sheet1" )
set oCell = oSheet.getCellByPosition( 0, 1 )
nValue = oCell.getValue()
msgbox nValue

Метки: ,

 
 
 

Ваш отзыв