Suppression lignes vides dans comboBox ?

Bonsoir le forum,

J'ai 2 combobox alimentées par 2 colonnes qui comportent des lignes vides...

Je voudrais que ces lignes vides n'apparaissent pas dans mes ComboBox.

Après quelques essais infructueux, je fais appel à votre savoir...

Voici mon code :

With cbo_Debit
    .Clear

[color=#008040]'    For Each Cel In Sheets("C.MUTUEL").Range("D5:D" & Sheets("C.MUTUEL").Range("D65536").End(xlUp).Row)[/color]

    For L = 5 To Nlig - 1
      .Value = Cells(L, 4).Value
        If .ListIndex = -1 Then
           .AddItem Cells(L, 4).Value
        End If
    Next L
  .ListIndex = -1

[color=#008040]'  Next Cel[/color]

End With

Merci pour l'aide que vous voudrez bien m'apporter...

Bonjour

Inspire toi de cet exemple.

Bye !

122classeur1-v1.xlsm (18.88 Ko)

Bonjour,

Différentes méthodes pour supprimer les lignes vides dans un ListBox/ComboBox.

Si le nombre de lignes de la BD est important, il faut éviter AddItem.

Boisgontier

Bonjour

encore moi a voir

Set Sh = Sheets("C.MUTUEL") ' mettre le CodeName a la place de Sheets("C.MUTUEL")
Nlig = Sh.Cells(Rows.Count, 1).End(xlUp).Row
With ComboBox1
    .Clear
    For L = 2 To Nlig
      .Value = Sh.Cells(L, 4).Value
        If .ListIndex = -1 And .Value <> "" Then
           .AddItem Sh.Cells(L, 4).Value
        End If
    Next L
  .ListIndex = -1
End With

A+

Maurice

Bonjour gmb, boidgontierJacques, et archer;

gmb, J'ai testé ton code qui fonctionne bien, mais il me laisse les doublons.

J'ai bien essayé de le combiné avec le mien qui lui les supprime, mais je n'y suis pas arrivé.

Merci tout de même pour ton aide...

boidgontierJacques, Merci pour ton fichier joint très complet. Je vais fouiller cette mine de renseignement pour mieux appréhender le sujet.

J'ai tenté d'essayer la solution (5- Avec ArrayList (0,7 sec pour 10.000 lignes) sans succès, mais c'est du à mes connaissances du VBA encore bien insuffisantes...

Félicitations pour ton site qui est une caverne d'alibaba pour les débutants comme moi, je le visite déjà depuis pas mal de temps et y ai puisé quelques inspirations.

Merci encore...

Archer, merci infiniment pour cette solution clé en main, J'ai bien ce que je cherchais (Plus de doublons et pas de ligne vides dans mes comboBox)...

Très efficace comme à ton habitude...

Rechercher des sujets similaires à "suppression lignes vides combobox"