# -*- coding: iso-8859-1 -*- #. // _ca_WriteFormula.py #. // Ecrit une formule dans une cellule avec options. def ca_WriteFormula( oSheet, nRow, nCol, xFormula ): oSheet.GetCellByPosition( nCol - 1, nRow - 1 ).SetFormula( xFormula ) return 0 ''' Dernière modification : 2022-02-19 [Todo] Voir les autres types à écrire. [Todo] Mettre les options. [Exemple] import sys sys.path.append( "modules" ) from _ca_WriteFormula import ca_WriteFormula # // Ecrit une formule dans une cellule avec options. from _ca_AutoFit import ca_AutoFit # // Règle les dimensions des cellules utilisées. from _lo_LibreOfficeNew import lo_LibreOfficeNew # // Ouvre Libre Office. from _lo_MakeProperty import lo_MakeProperty # // Créer une propriété Libre Office. oServiceManager = lo_LibreOfficeNew() if oServiceManager is None: quit() args1 = lo_MakeProperty( oServiceManager, "Hidden", False ) oDesktop = oServiceManager.createInstance( "com.sun.star.frame.Desktop" ) oDoc = oDesktop.loadComponentFromURL( "private:factory/scalc", "_blank", 0, [ args1 ] ) oSheet = oDoc.GetSheets().GetByIndex( 0 ) ca_WriteFormula( oSheet, 1, 1, "Texte" ) ca_WriteFormula( oSheet, 1, 2, "Cellule texte" ) ca_WriteFormula( oSheet, 2, 1, "Nombre" ) ca_WriteFormula( oSheet, 2, 2, 123.45 ) ca_WriteFormula( oSheet, 3, 1, "Logique" ) ca_WriteFormula( oSheet, 3, 2, "=TRUE()" ) ca_AutoFit( oSheet ) oServiceManager = None [/Exemple] '''