Merci pour tout ;0) > zorglub.1er a écrit : > > Bonjour ;0) > > > > D'abord merci pour votre attention et votre engagement dans > > cette liste :0) > > > >> REM equivalence com.sun.star.table.CellHoriJustify.CENTER > >> oRange.HoriJustify = 2 > > > > Cela fonctionne. > > > > Toutefois, quand je cherche dans l'aide d'OpenOffice.org je ne > > trouve ni la propriété CellHoriJustify ni la propriété merge. > > > > http://api.openoffice.org/docs/common/ref/com/sun/star/util/XMergeable.html#merge > > > > D'ailleurs, comment sais tu que pour CellHoriJustify on > > utilise les chiffres 1, 2, 3 et non left, center, right quand > > cette propriété est utilisée sans l'usage de com.sun.star.table. ? > > > > Un bon moyen d'en apprendre un peu plus pour manipuler OOo via des > macros est d'utiliser l'excellent outils Xray > > Ainsi, pour HoriJustify tu obtiendras cette information : > > http://www.cijoint.fr/cij97272337418937.png > > qui précise qu'une valeur Integer est utilisée. > > En faisant quelques tests on finit par en retirer des éléments > d'informations utiles ;) > > Xray est disponible ici (merci Bernard Marcelly) : > http://fr.openoffice.org/Documentation/How-to/Basic/XrayTool_fr.sxw > > > En effet, il n'est pas mentionné dans cette page ci-desous que > > les chiffres doivent être utilisés dans ce cas. > > > > http://api.openoffice.org/docs/common/ref/com/sun/star/table/CellHoriJustify.html > > > > L'emploi des valeurs numériques n'est pas recommandée, ainsi que l'a > rappelé Laurent Godard dans ce dernier message : > http://fr.openoffice.org/servlets/ReadMsg?list=prog&msgNo=5965 > > Il est nettement préférable d'utiliser les constantes alpha. > > Mais parfois il pourra être nécessaire d'en récupérer le correspondant > numérique : > > http://ooo.developpez.com/faq/?page=Automation#Question174 > > > > Ainsi, je ne sais pas comment trouver (et comment chercher) > > que c'est les chiffres 1, 2, 3 qu'il faut utiliser dans le cas > > de CellHoriJustify sans com.sun.star.table. > > > > Voici une macro fonctionelle usant de ces deux propriétés sans > > com.sun.star > > > > -------------------------------------- > > > > REM ***** BASIC ***** > > > > Sub ExempleFusion > > > > thisComponent.Sheets.getByName("Feuille1").getCellRangeByName("d2").String > > = "OUILLE" > > thisComponent.Sheets.getByName("Feuille1").getCellRangeByName("d2:e2").merge(true) > > thisComponent.Sheets.getByName("Feuille1").getCellRangeByName("d2:e2").HoriJustify=3 > > > > thisComponent.Sheets.getByName("Feuille1").getCellByPosition(1,0).String > > = "quatre" > > thisComponent.Sheets.getByName("Feuille1").getCellRangeByPosition(1,0, > > 6,0).merge(true) > > thisComponent.Sheets.getByName("Feuille1").getCellRangeByPosition(1,0, > > 6,0).HoriJustify=2 > > > > thisComponent.Sheets.getByName("Feuille1").getCellByPosition(3, > > 1).String = "KIKO" > > thisComponent.Sheets.getByName("Feuille1").getCellRangeByPosition(3,1, > > 4,1).merge(true) > > thisComponent.Sheets.getByName("Feuille1").getCellRangeByPosition(3,1, > > 4,1).HoriJustify=2 > > > > End Sub > > > > ----------------------------------- > > > >> Mais quel est le but de la question ? > >> Quel est l'interet escompté ? > > > > Comme je ne comprends pas ce qu'est "com.sun.star.table", ni > > son usage (je ne sais pas m'en servir), j'essaye de faire des > > macros sans "com.sun.star.table" > > > > En effet, étant débutant dans l'apprentissage des macros > > l'usage de "com.sun.star.table" ne m'est pas évident. > > > > Merci d'avance ;0) > > > > La programmation "avancée" requiert de l'expérience, aussi il faut > prendre le temps de se documenter (les sources d'informations sont > nombreuses) , puis de tester. > > Je t'invite dans un premier temps à lire ces documents: > > http://docs.sun.com/app/docs/doc/819-1328?l=fr (en ligne) > http://docs.sun.com/app/docs/doc/819-1328?l=fr&a=load (téléchargement) > > http://www.eyrolles.com/Informatique/Livre/9782212117639/livre-programmation-openoffice-org-2.php > ouvrage d'excellente qualité à lire et relire ;) > > Francois Gatto > > --------------------------------------------------------------------- > To unsubscribe, e-mail: [EMAIL PROTECTED] > For additional commands, e-mail: [EMAIL PROTECTED] > >
Créez votre adresse électronique [EMAIL PROTECTED] 1 Go d'espace de stockage, anti-spam et anti-virus intégrés. --------------------------------------------------------------------- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
