Bonsoir,
je voudrais faire une boucle for each dans une colonne et je voudrais mettre une condition pour ajouter une couleur dans toute les cellules de la ligne 15 à 35 inclut.
Soit : les cellules de font rouge
A15;A16;A17; etc jusqu'a A35.
Pour le numéro de ligne j'utilise la variable c.row (pou savoir ou se situtu c) de la boucle :
For Each c In Range(Cells(1, 1), Cells(fin, 1))
ce que je sais pas faire c'est la condition qui dit entre 15 inclu et 35 inclu
For Each c In Range(Cells(1, 1), Cells(fin, 1)) 'je sais pas faire
Voici le code :
Sub test2()
fin = Range("a65536").End(xlUp).Row
For Each c In Range(Cells(1, 1), Cells(fin, 1))
' Metre une couleur jaune dans toutes les cellules
' de la ligne 15 inclu a 35 inclu
If c.Row >= "15" And c.Row < "35" Then
c.Interior.ColorIndex = 3
End If
Next c
End Sub
Je remerci par avance le forum
Laurent