Excel et VB - Mise en forme des cellules

Bonjour à tous ...

J'ai un petit soucis dans le pilotage d'Excel. Pas l'exportation ni l'écriture des données mais, j'aimerais faire un peu de "mise en page".

Suivant les données ou les valeurs, changer la couleur de la police d'une cellule ou d'un groupe de cellule, ou la remplir d'une couleur bien particulière.

Lorsque j'essaye d'accéder à une cellule, comme si j'écrivais dedans avec le code suivant (par exemple) avec obj_ws étant mon objet Worksheet :

Code:

---

1 2 3 4 5

If (obj_reader("is_intracomm_regin").ToString = "1") Then obj_ws.Cells(int_cpt, 9) = obj_reader("total_ttc_regin").ToString + " €" obj_ws.Cells(int_cpt, 10) = obj_reader("tva_ded_regin").ToString + " €" End If

---

En fait je n'ai aucune possibilité de changer la police ou les couleurs ...

Cela doit (comme toujours) me crever les yeux, mais ... Ben je vois pas ;)

Merci d'avance ...

Je te suggère de lire le chapitre VI de cet article, il t'ouvrira de nouveaux horizons sur le pilotage Excel, et notamment pour la mise en forme des données :
Pilotage de l'application Office Excel (Excel Automation)

Tu verras, c'est pas sorcier :ccool:

Effectivement, à partir de là je vais pouvoir essayer pas mal de trucs pour perfectionner mes feuilles Excel.

Merci :)

Je fais exactement la même chose en ce moment alors voilà quelques pistes :

Code:

---

1 2 3 4

obj_ws.Cells(int_cpt, 9).Interior.Color = RGB(255, 255, 153) 'met un fond jaune à la cellule   obj_ws.Rows(1).Font.Bold = True 'met toute la première ligne en gras

---

etc...

Une petite astuce que j'utilise : je tape les commandes en VBA dans Excel pour qu'il m'affiche les méthodes et propriétés disponibles pour l'objet, lorsqu'il ne le fait pas dans mon appli VB......
Bon courage.