VBA et format de cellule

Bonjour à tous,

J'ai un petit problème de programmation sous VBA. Je souhaite qu'en lançant la macro toutes les lignes de ma matrices soient en police rouge, sauf pour les lignes pù la colonne H n'est pas incrémenter.

https://www.excel-pratique.com/~files/doc/suivi_container_ju2.zip

Je réussi à le faire avec une seule cellule: (en Module3)

Range("H10").Select
    If Selection.Value = "" Then
    Selection.Interior.ColorIndex = 3
    Else
    Selection.Interior.ColorIndex = 5
    End If
    End Sub

Mais je n'arrive pas à rentrer un code pour qu'excel vérifie pour chaque ligne si H est renseignée. J'ai essayé ça mais cela ne fonctionne pas: (Module 2)

 Rows("10:2200").Select
    If Column("H").Value = "" Then
    Selectiion.Font.ColorIndex = 2
    Else
    Selection.Font.ColorIndex = 3

Merci d'avance pour vote aide

Sub couleur()
Dim cell As Range

For Each cell In Range("H:H")
If cell.Value = "" Then
cell.Interior.ColorIndex = 3
Else
cell.Interior.ColorIndex = 5
End If
Next

End Sub

A adapter... (je n'ai pas réussi à ouvrir ton fichier)

Cordialement,

V_Elbie

Bonjour et merci,

Effectivement ça marche .

il me reste plus qu'à appliquer a toute la ligne.

merci beaucoup pour le coup de pouce