Charger un listbox multicolonnes sous condition

  • Initiateur de la discussion Initiateur de la discussion blord
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

blord

XLDnaute Impliqué
Bonjour à tous,

Voici mon problème, j'aimerais charger un listbox multicolonnes avec les données suivantes de ma feuille :

Colonne A : numéro de fournisseur
Colonne B : nom du fournisseur
Colonne N : solde à payer

Seulement si le solde affiché dans la colonne N est différent de 0...

Merci de votre aide....

Benoi Lord
 

Pièces jointes

Re : Charger un listbox multicolonnes sous condition

Bonjour Blord,

Je crois qu'il faut appliquer un filtre automatique en VBA, et depuis charger ton ListBox par les cellules visibles du résultat du filtre.

Peut-être les spécialistes auront mieux comme idées.

Bonne chance.

🙂
 
Re : Charger un listbox multicolonnes sous condition

Bonjour,

Merci pour l'idée mais j'ai déjà vu qu'il était possible de charger un listbox standard sous condition, il est peut-être possible de faire le tout avec un listbox multicolonnes directement sans passer par une étape intermédiaire...

Benoit Lord
 
Re : Charger un listbox multicolonnes sous condition

Bonjour,

Merci pour l'idée mais j'ai déjà vu qu'il était possible de charger un listbox standard sous condition, il est peut-être possible de faire le tout avec un listbox multicolonnes directement sans passer par une étape intermédiaire...

Benoit Lord

Je ne sais pas le faire sans étape intermediaire.

Attendant les autres, peut-être qu'ils sauront le faire 😉

Bon voila un essai avec filtre élaboré en PJ
 

Pièces jointes

Re : Charger un listbox multicolonnes sous condition

Bonjour,

Code:
Private Sub UserForm_Initialize()
  k = 0
  With Sheets("fournisseurs")
   For i = 2 To .[A65000].End(xlUp).Row
    If .Cells(i, 14) > 0 Then
      Me.ListBox1.AddItem
      Me.ListBox1.List(k, 0) = .Cells(i, 1)
      Me.ListBox1.List(k, 1) = .Cells(i, 2)
      Me.ListBox1.List(k, 2) = .Cells(i, 14)
      k = k + 1
    End If
   Next i
 End With
End Sub


JB
 

Pièces jointes

Re : Charger un listbox multicolonnes sous condition

Bonjour BOISGONTIER, APT, le forum,

APT, quoi que ta méthode est fonctionelle, il faut avouer que le code de Boisgontier est vraiment très efficace et direct.... merci quand même de t'être penché sur mon problème...

Boisgontier, un très gros merci pour ton petit bout de code qui me simplifiera grandement la vie dans mon projet...

Benoit Lord
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
5
Affichages
116
Réponses
6
Affichages
534
Réponses
5
Affichages
232
Réponses
26
Affichages
1 K
Retour