colorer un array en fonction d'un multipage

Bonjour à tous,

J'arrive à la fin d'un projet, dernière petite étape!

Je souhaite simplement que lorsque l'utilisateur clique sur un checkbox "ABS" puis sur Valider, la ligne correspondante soit colorée. J'ai tenté le code ci-dessous (entre autres) mais sans succès. Je vous serai reconnaissant de bien vouloir m'indiquer la marche à suivre, mon cerveau est à plat là^^'

Code:

---

1 2 3 4 5 6

last_colonne = Sheets("Repart").Range("A1").End(xlToRight).Column For f = 1 To 8 If UserForm_calculer.Controls("CheckBox_name" & f).Value = True Then Sheets("Repart").Range("f + 1 : last_colonnne").Interior.Color = RGB(160, 96, 0) End If Next

---

Pièce jointe 557513

Merci bien!

Bonjour

Citation:

---

Envoyé par Orgvba

la ligne correspondante soit colorée. J'ai tenté le code ci-dessous (entre autres) mais sans succès.

---

Comme ceci ce devrait être plus efficace :

Code:

---

1 2 3 4 5 6

last_colonne = Sheets("Repart").Range("A1").End(xlToRight).Column For f = 1 To 8 If UserForm_calculer.Controls("CheckBox_name" & f).Value = True Then Sheets("Repart").Cells(f + 1,1).Resize(1, last_colonnne).Interior.Color = RGB(160, 96, 0) End If Next

---

Bonsoir Anasecu,

Ca fonctionne parfaitement merci beaucoup! Je connaissais pas Resize en plus c'est parfait :D

Bonne soirée!