Export vers Calc Openoffice

[Kaly]

Bonjour,

Je suis en train de tester l'export de données vers Calc. Je récupère bien mes toutes les infos mais j'ai un peu de mal avec la mise en forme :

- auto dimensionner les colonnes
- mettre des bordures aux cellules
- formatage des cellules (pourcentage)

Quelqu'un peut m'aider ?

D'avance merci.

[amahi]

Pour excel je m'emmerde plus je genere directement un fichier html avec un tableau . Il faut juste lui mettre une extension .xls.
Reste à voir si calc est aussi souple que excel a ce niveau.

[Kaly]

Merci mais j'ai bien avancé sur cet export et je ne pense pas que le html soit adapté à mon besoin.

L'utilisateur déclenche un export. Le fichier calc généré est rattaché dans le document pour que l'utilisateur puisse le modifié.

Mon pb c'est la mise en forme.grrr

[Bidouille]

Salut,

Essayes avec cela si ca peu te faire avancer (pour Excel ... certe)

http://www.seusoft.com/ExcelReport01.html

[roubech]

ne connaissant pas par coeur toutes les fonction Excel, en général, on enregistre une macro dans Excel avec les manip qu'on veut faire, et ensuite on récupère le code de la macro pour l'adapter dans l'agent Notes.
Le principe reste valable pour OpenOffice

Sinon, si tu peux passer par un modèle de fichier, c'est encore plus simple ...

[Jérome Deniau]

Simple, installer Lotus-Notes 8 Standard AVEC Symphony, installer le toolkit Symphony, comme symphony respecte la norme openoffice....

[Kaly]

Simple, installer Lotus-Notes 8 Standard AVEC Symphony, installer le toolkit Symphony, comme symphony respecte la norme openoffice....

Je me remet sur mon pb aujourd'hui, j'ai lotus notes 8 avec Symphony. Qu'est ce que le toolkit ? Où puis-je le trouver ?

Pour mon problème du départ,

j'ai solutionné le fait d'autodimensionner les cellules :

Code : Tout sélectionner

   Dim MaZone As Variant
   Dim MesColonnes As Variant
   Set MaZone = worksheet.getCellRangeByName("A1:J1")
   Set MesColonnes = MaZone.Columns
   MesColonnes.OptimalWidth = True

ainsi que de mettre la cellule au format pourcentage :

Code : Tout sélectionner

cell.numberformat = 11

Si quelqu'un a une solution pour mettre des bordures aux cellules, je suis preneur.

D'avance merci