Bonjour,
Mon problème est le suivant :
Si dans la colonne K, 'MAT' est trouvé colore la ligne en rouge.
Mais moi je n'arrive qu'a coloré la cellule contenant le mot 'MAT'.
With Worksheets("Feuil1").Range("K1:K5000")
Set c = .Find("MAT", LookIn:=xlValues)
If Not c Is Nothing Then
firstAddress = c.Address
Do
c.Font.ColorIndex = 3
Set c = .FindNext(c)
Loop While Not c Is Nothing And c.Address <> firstAddress
End If
End With
merci d'avance pour votre aide.
Cordialement,
Estelle :)