Coloré toute la ligne listview

[chich]

Bonjour,
Je voudrais crée un code qui permet de parcourir une listview et cherche un mot dans la colonne par ex:3, s'il le trouve il va coloré toute la ligne par une couleur, Comment faire, Merci d'avance.

 

[CHALET53]

En cliquant sur une ligne de la listview cette macro colore en bleu la ligne (remplacer 5 par le dernier numéro de colonne
With ListView1
a = .SelectedItem.Index
.ListItems(a).ForeColor = &HFF0000
For j = 1 To 5
.ListItems(a).ListSubItems(j).ForeColor = &HFF0000
Next
End With

a+

 

[chich]

En cliquant sur une ligne de la listview cette macro colore en bleu la ligne (remplacer 5 par le dernier numéro de colonne
With ListView1
a = .SelectedItem.Index
.ListItems(a).ForeColor = &HFF0000
For j = 1 To 5
.ListItems(a).ListSubItems(j).ForeColor = &HFF0000
Next
End With

a+

Re
super merci beaucoup je garde
mais je souhaite que dans la listview si une ligne contient par exemple le mot" valider" alors elle se colore en rouge
merci d'avance

 

[CHALET53]

Couleur rouge :

With ListView1
a = .SelectedItem.Index
.ListItems(a).ForeColor = &HFA
For j = 1 To 5
.ListItems(a).ListSubItems(j).ForeColor = &HFA
Next
End With

 

[ChTi160]

Bonsoir chich
Bonsoir Le Fil
un petit exemple vite fait de ce que j'ai compris!
n’hésite pas si besoin
Bonne fin de Soirée
Jean marie