Discussion :

[BM42]

Salut a tous

Tout d’abord je tien à souhaiter à tous (avec un peut de retard ) mes meilleurs vœux pour la nouvelle année. Je me permettrais d’avoir une pensé particulière pour nos chers modérateurs et pour tous ceux qui, au fil du temps mon apportés leurs aides.

Ceci étant fait …
Je voudrais savoir si il est possible de changer la police et le type de donnée (Texte, Numérique, Monétaire, …) d’une cellule Excel directement de VB6.
Hein ! qu’elle est bonne ma question ….

J’ais bien potassé les tutos mais je n’ais rien trouvé … ou alors je devient GAGA.

Merci de votre aide.

A+

[LeForestier]

Bonjour,
S je ne me trompe pas...
A partir du nom que tu a donné à l'objet Excel (dans VB6) tu dispose de toutes les possibilités d'Excel.
Ou alors j'ai pas bien compris la question.

A+

[BM42]

Salut

Je voudrais faire la mise en page d'une feuille excel issue d'une exportation d'une base SQL vers excel a l'aide de VB.
Je voudrais par exemple que les nombres négatif ressorte en rouge, les totaux en gras, les nombres monétaire au format monétaire avec le sigle €, ...
je voudrais pouvoir le faire directement de VB .... mais je ne sais pas comment

A+

[LeForestier]

Mais à partir de VB6, tu 'importe le fichier Excel ?
Si non, voir dans la FAQ pour ouvrir un un objet 'classeur Excel' à partir de VB6

Edit: Jouerais-tu au chat et a la souris ...
Tu a participé à cette discution le 29/11/2007 à 18h45 qui montre justement la façon d'ouvrir excel à partir de VB6.
Edit2:
Sinon, tu a encore Celle-ci et pour en avoir plus tu tape 'Excel VB6' dans la recherche il y a plein d'exemple....

[BM42]

Je ne bloc pas sur la création et le remplissage du fichier excel mais sur la mise en forme du comptenue.
Pour etre plus precis je voudrais faire avec VB ce que je pourrait faire dans excel avec le menu "Format" puis "Cellule" ou modifier les polices de texte d'une partie du fichier.
Un exemple tout bete :
- j'importe des nombres dans une colonne qui corresponde a des montants de facture. J'usque la aucun problème. Maintenant je veut que le symbole monétaire (€) apparraisse, donc dans excel :
menu Format->Cellule->Monétaire->Symbole->€

Dans ce cas je voudrais a la création de mon fichier excel définir le format des cellules concernées en "monétaire". Pour etre franc je doute que cela soit possible de vb car tous les exemples que je trouve passe par des macros excel

[Delbeke]

Quand je bloque comme çà sur un problème excel, je fais la manip à la main dans excel, tout en enregistrant en macro. Ensuite je décortique le code généré dans la macro. Ca aide ensuite a pondre le code vb6.

[BM42]

Salut

Et merci pour votre aide
La solution de Delbeke était la bonne. Il suffit d'enregistrer une macro puis d'adapter son code a VB ce qui donne par exemple, pour un nombre en monétaire qui s'écrit :
1 235,52 € ou -1 235,52 €

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Xlsheet.Cells(Lg, 2) = rs!Cout
Xlsheet.Cells(Lg, 2).NumberFormat = "#,##0.00_)$; [Red] (#,##0.00)$"

Pour mettre une cellule en gras :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Xlsheet.Cells(Lg, 2) = rs!Total
Xlsheet.Cells(Lg, 2).Font.Bold = True

Attention au variante de code des macros et de VB, ex. :
"$#,##0.00_); [Red] ($#,##0.00) " dans une macro
s’écrit "#,##0.00_)$; [Red] (#,##0.00)$" dans VB

Merci a tous

A+