Colorer les lignes dans listbox multicolonne

hich24 Messages postés 1635 Date d'inscription   Statut Membre Dernière intervention   -  
cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   -
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 7904 Date d'inscription   Statut Contributeur Dernière intervention   729
 
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 1635 Date d'inscription   Statut Membre Dernière intervention   753
 
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 7904 Date d'inscription   Statut Contributeur Dernière intervention   729
 
Pour faire cela il faut passer par une Listview:

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