Dégradé par ligne

[KIAKOU]

salut, après l'export de ma requette du vb 2008 vers ma feuille excel je veux bien que mes lignes qui ont une certaine condition ont la même couleur les lignes suivants avec une dégradé et ainsi de suite exp

ligne avec condition :
1 -1 rouge
1 -1 rouge
1 -1 rouge
1 -1 rouge
1 -2 degradé du rouge
1- 2 dégradé du rouge
1 -2 dégradé du rouge
1 -3 dégradé du rouge
et ainsi de suite pour les autres couleurs

j'ai essayé une boucle avec cette ligne :
i c pour les lignes
j c pour les colones
dim a as integer = 0
dim a as integer b = 0
dim a as integer j = 0
for i = 0 to 100
if ActiveSheet.Cells(i, 1).value = ActiveSheet.Cells(i-1, 1).value then
ActiveSheet.Cells(i, j).Interior.Color = RGB(255, a, b)
end if
a+= 10
b+=10
next
mais ca marche pas je sais que le problème est dans l’incrémentation de a et b mais je c pas comment faire , merci d'avance

 

[KIAKOU]

Re : Dégradé par ligne

salut carcharodon-carcharias :
j'ai lu la charte,
je crois que j'ai respecté les normes mon sujet ainsi que les détails sont bien claires espérons avoir une idée éclaire d'un passionné d'Excel et du vba , il y a un fichier en pièce jointe pour plus d'explication, en attendant vos réponse, mes salutations d'avance . Merci 🙂