disculpen nesecito escribir datos en las celdas de una hoja de calc desde vb.net pero no encuentro la forma, ya puedo abrir el documento
con el siguiente codigo:
Dim sUrl As String = String.Empty
Dim sArchivo As String = String.Empty
Dim xComponent As XComponent
Dim arProps() As unoidl.com.sun.star.beans.PropertyValue = New unoidl.com.sun.star.beans.PropertyValue() {}
Dim FileName As String = nombreArchvo
'Llame al método bootstrap para obtener un nuevo ComponentContext
Dim localContext As unoidl.com.sun.star.uno.XComponentContext = uno.util.Bootstrap.bootstrap()
'Obteniendo un nuevo administrador de servicios del tipo MultiServiceFactory
Dim multiServiceFactory As unoidl.com.sun.star.lang.XMultiServiceFactory = DirectCast(localContext.getServiceManager(), unoidl.com.sun.star.lang.XMultiServiceFactory)
'Crea una nueva instancia de escritorio usando nuestro administrador de servicios
Dim componentLoader As XComponentLoader = DirectCast(multiServiceFactory.createInstance("com.sun.star.frame.Desktop"), XComponentLoader)
'abrir el archivo
sArchivo = FileName
sUrl = PathConverter(sArchivo)
xComponent = componentLoader.loadComponentFromURL(sUrl, "_blank", 0, arProps)
Última edición por Jose Sosa el Mié Dic 20, 2017 10:56 pm, editado 1 vez en total.
Creo recordar que tu pregunta ya se ha hecho... ¿ya realizaste alguna búsqueda?
Saludos
______________________________________________
"Todo cuanto no podemos dar nos posee". - André Gide
LibreOffice 6.2 | ArchLinux | Gnome3 No respondo preguntas privadas, por favor, usa el foro
Personalmente desconozco como usar "visual studio2013 vn.net", pero tal vez este post que hace referencia a Visual Basic 6 pueda servirnos si lo adaptamos al Studio.
Dicho código inserta datos en algunas celdas. https://forum.openoffice.org/es/forum/v ... c+6#p43428
Saludos.
lo 6.2.0 | aoo 4.1.6 | win 7/10 ¡Un aplauso para todos los que luchan por proteger y promover la Web abierta!