Vba

davido -  
moiced59 Messages postés 1145 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,


jai essayé de colorié qqs lignes avec cela mais il ne fonctionne pas, vous pouvez me dire ce qui ne va pas?


Sub couleurs()
For i = 1 To 10
Cells(i, 1) = i
Cells(i, 2).interieur.ColorIndex = 4
Next i
End Sub

2 réponses

michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 314
 
bonjour
interior
et non interieur

et tu colories tes 10 lignes en vert

0
moiced59 Messages postés 1145 Date d'inscription   Statut Membre Dernière intervention   60
 
Bonjour

En faisant comme ca tu as une couleur differente a chaque fois

For i = 1 To 10
Cells(i, 1) = i
Cells(i, 2).Interior.ColorIndex = i
Next i
0