alimenter listbox avec cellules filtrées sans cellules vides

[KALLISTE]

Bonsoir le forum,

Voici mon problême, comment alimenter une listbox avec des données issues d'une colonne filtrée et contenant des cellules vides.
Dans la listbox ne doivent apparaitres que les cellules visibles contenants des données sans les cellules vides.

Merci pour votre réactivité.

 

[patte d'ours]

Re : alimenter listbox avec cellules filtrées sans cellules vides

Bonsoir

Tu peux créer une petite macro qui passera en revue toutes les lignes possibles en testant

1) la propriété Hidden (true quand la ligne est masquée)

2) la valeur de la cellule (<>"")

bon courage

 

[KALLISTE]

Re : alimenter listbox avec cellules filtrées sans cellules vides

Bonsoir Patte d’ours,
Merci pour ta réponse, hélas elle ne convient pas dans mon cas en effet cette solution masque bien toutes les lignes vide de la colonne A avec malheureusement toutes les informations sur la même ligne des colonnes suivantes. Ce sont ces informations qui servent de critère de filtre.

 

[matthieu33]

Re : alimenter listbox avec cellules filtrées sans cellules vides

Bonsoir Kalliste et le forum,

Voici une solution.

@+

 

[KALLISTE]

Re : alimenter listbox avec cellules filtrées sans cellules vides

Bonsoir MATTHIEU33,
Excellent, ta proposition fonction très bien. J’ai juste modifié une ligne de ton code :

‘For lgLig = 2 To 65536

J’ai une grande quantité de données à traiter dans la colonne A.
Cela ralenti la procédure mais bon ça fonctionne très bien.

Merci Matthieu et merci à tout le forum, véritable mine d’information.

 

[matthieu33]

Re : alimenter listbox avec cellules filtrées sans cellules vides

Au lieu de mettre "For lgLig = 2 To 65536", si tu veux atteindre la dernière ligne de la colonne A, tu peux mettre
For lgLig = 2 To Range("A" & Cells.Rows.Count).End(xlup).Row

@+