Colorer les lignes dans listbox multicolonne

Fermé
hich24 Messages postés 1619 Date d'inscription mardi 2 octobre 2007 Statut Membre Dernière intervention 11 avril 2023 - 5 nov. 2016 à 08:39
cs_Le Pivert Messages postés 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024 - 6 nov. 2016 à 07:50
bonjour,
j'ai une listebox multicolonne ( 18 colonne ) qui regroupe les enregistrements de la feuille excel,
je veut bien colorer toutes les lignes a condition que la valeur de la colonne 5 soit vide

merci d'avance mes cher respecter.

2 réponses

cs_Le Pivert Messages postés 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024 728
Modifié par cs_Le Pivert le 5/11/2016 à 16:46
Bonjour,

Comme ceci:

Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
  With Sheets("BD") 'adapter nom de la feuille
    If Application.CountA(Range("E2:E" & Range("A65536").End(xlUp).Row)) = 0 Then 'E2 si en-tête
    ListBox1.ForeColor = RGB(255, 0, 0) 'rouge
    Else
     ListBox1.ForeColor = RGB(0, 0, 0) 'noir
    End If
End With
End Sub



Essai fait avec Recherche d'un mot dans une BD de Boisgontier


http://boisgontierjacques.free.fr/pages_site/formulaireListes2colonnes.htm#RechIntuitif


@+ Le Pivert
1
hich24 Messages postés 1619 Date d'inscription mardi 2 octobre 2007 Statut Membre Dernière intervention 11 avril 2023 752
Modifié par hich24 le 5/11/2016 à 23:37
merci pour votre aide ,ca marche mais elle colore toute la liste box alors jeveut bien avoir seulment les ligne qui ont la valeur sur la colone 5 vide
0
cs_Le Pivert Messages postés 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024 728
6 nov. 2016 à 07:50
Pour faire cela il faut passer par une Listview:

https://silkyroad.developpez.com/VBA/ListView/
1