Piloter OpenOffice Calc en VB.net

Le code suivant démarre une instance de Calc et écrit dans la cellule A1 de la première feuille :

Dim servManager = CreateObject("com.sun.star.ServiceManager")
Dim desktop = servManager.createInstance("com.sun.star.frame.Desktop")
Dim arguments As Object() = {}
Dim document = desktop.loadComponentFromURL("private:factory/scalc", "_blank", 0, arguments)
Dim firstSheet = document.Sheets.getByIndex(0)
firstSheet.getCellbyPosition(0, 0).setString("Hello world!")
Français

Etiquettes:

Ajouter un commentaire