problem in working with excel via com server
hi does excel needed to be installed to work with com server? Sys.oleobject("Excel.Application") gives error "invalid class ID" when the excel is not installed.we hav scenario where te...
Forum Discussion
Hi i can able to write data to xls through open office
Example
Sub Main()
Set ServiceManager = CreateObject("com.sun.star.ServiceManager")
Dim propertyN
Set propertyN = ServiceManager.Bridge_GetStruct("com.sun.star.beans.PropertyValue")
propertyN.Name = "Hidden"
propertyN.Value = True
Set Desktop = ServiceManager.createInstance("com.sun.star.frame.Desktop")
arr = Array()
Set Document = Desktop.LoadComponentFromURL("file:///C:\temp.xls", "_blank", 0, arr)
Set Sheets = Document.getSheets()
Set Sheet = Sheets.getByName(SheetName)
Sheet.getCellByPosition(8, 1).String="PASS"
Document.Store
Document.Close (True)
Desktop.terminate
End Sub
the problem is that Set ServiceManager = CreateObject("com.sun.star.ServiceManager")
is actually opening doucment in GUI. i dont want document to be visible in gui when editing.. So i have used hidden property in code. but there is no effect on operation and the document is still visible in screen when editing.
Example
Sub Main()
Set ServiceManager = CreateObject("com.sun.star.ServiceManager")
Dim propertyN
Set propertyN = ServiceManager.Bridge_GetStruct("com.sun.star.beans.PropertyValue")
propertyN.Name = "Hidden"
propertyN.Value = True
Set Desktop = ServiceManager.createInstance("com.sun.star.frame.Desktop")
arr = Array()
Set Document = Desktop.LoadComponentFromURL("file:///C:\temp.xls", "_blank", 0, arr)
Set Sheets = Document.getSheets()
Set Sheet = Sheets.getByName(SheetName)
Sheet.getCellByPosition(8, 1).String="PASS"
Document.Store
Document.Close (True)
Desktop.terminate
End Sub
the problem is that Set ServiceManager = CreateObject("com.sun.star.ServiceManager")
is actually opening doucment in GUI. i dont want document to be visible in gui when editing.. So i have used hidden property in code. but there is no effect on operation and the document is still visible in screen when editing.
