Je voulais faire un commentaire à la contribution 16372 d'@lphonse
mais mon texte est sans doûte trop long.
Ma contribution n'est qu'une adaptation de cette superbe contribution.
J'ai travaillé sur les couleurs en reprenant toDecimal cité dans un commentaire
Voici mes modestes adaptations :
attention j'ai squizzé la gestion des styles d'@lphonse (par flemme).
Bravo @alphonse et shubacca c'est génial !!!!!!!!!!!
la function todecimal trouvée sur ce site (localstone id 16365) est intacte
par contre j'ai simplifié HTMLtoRGB
j'ai mis en dur une couleur de fond de la table
car je n'ai pas réussi à la récupérer dans le html
vcolorTABLE=HTMLtoRGB("#FFFFE0");
La partie intéressante :
if (eSrc.cells(i).bgColor != "") {
vcouleurHEXA=eSrc.cells(i).bgColor;
vcolor=HTMLt oRGB(vcouleurHEXA);
for (var j = 0; j < eSrc.cells(i).colSpan; j ++)
oExcel.ActiveSheet.Cells(r,c+j).Interior.Color = vcolor ;
}
else
{
for (var j = 0; j < eSrc.cells(i).colSpan; j ++)
oExcel.ActiveSheet.Cells(r,c+j).Interior.Color = vcolorTABLE ;
}