VB.NET souligner des cellules Excel

cs_filou Messages postés 98 Date d'inscription mercredi 19 décembre 2001 Statut Membre Dernière intervention 15 janvier 2008 - 15 sept. 2007 à 11:59
cs_filou Messages postés 98 Date d'inscription mercredi 19 décembre 2001 Statut Membre Dernière intervention 15 janvier 2008 - 17 sept. 2007 à 12:07
Bonjour,

Depuis VB je crée un fichier excel que je remplis avec des données d'un DataTable.
J'aimerai souligner toutes les cellules d'une plage.
J'ai essayé ceci mais cela ne fonctionne pas

Feuille.Range(

"A12:G" & I).Select.Borders(Excel.XlBordersIndex.xlEdgeLeft)

J'ai fais une simulation avec une macro sous Excel mais impossible d'appliquer le code génerer

Merci d'avance FiloU

2 réponses

Molenn Messages postés 797 Date d'inscription mardi 7 juin 2005 Statut Membre Dernière intervention 23 février 2011 7
17 sept. 2007 à 11:41
On n'a pas trop de détail, mais à mon avis, en te débarrassant du .select, ça devrait fonctionner (le .select, l'enregisteur de macro t'en colle partout, mais dans le code, on se rend compte qu'à 99%, c'est inutile) :

Feuille.Range("A12:G" & I).Borders(Excel.XlBordersIndex.xlEdgeLeft)

Ca devrait être mieux.

Molenn
0
cs_filou Messages postés 98 Date d'inscription mercredi 19 décembre 2001 Statut Membre Dernière intervention 15 janvier 2008
17 sept. 2007 à 12:07
Salut et merci,
Voila le code qui fonctionne :

With

appExcel.Range(
"A12:G" & I).Borders(Excel.XlBordersIndex.xlEdgeBottom)
         .LineStyle = Excel.XlLineStyle.xlContinuous
         .
ColorIndex = Excel.Constants.xlAutomatic

End
With

FiloU
0
Rejoignez-nous