Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Charger un listbox multicolonnes...

  • 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 les gens du forum...

J'aimerais savoir s'il est possible d'effectuer l'opération suivante pour le chargement d'un listbox multicolonnes de 3 colonnes :

Pour une ligne quelconque retrouvée à l'aide d'une clé de recherche supposons la ligne 32 :

charger le contenu des cellules C32-D32-E32 dans la première ligne du listbox
charger le contenu des cellules F32-G32-H32 dans la deuxième ligne du listbox
charger le contenu des cellules I32-J32-K32 dans la troisième ligne du listbox

etc...

Merci à tous !

Blord
 
Re : Charger un listbox multicolonnes...

Bonsoir Blord,

Essaye un code du style:

Code:
Sub LST()
For i = 1 To 3
c = Range(Cells(32, 3 * i))
Listview.ListItems.Add , , c
Listview.ListItems(i).ListSubItems.Add , , c.Offset(0, 1)
Listview.ListItems(i).ListSubItems.Add , , c.Offset(0, 2)
Next i
End Sub

Ce serait plus simple si tu envoyais un exemple avec la macro que tu as déjà réalisée.

@+

Gael
 
Re : Charger un listbox multicolonnes...

Bonsoir Blord,

Voici une solution :
Code:
    Dim Lig As Long
    Dim Col As Long
    
    Lig = 32
    
    ListBox1.Clear
    
    ' Boucle sur toutes les colonnes de C à K sur la ligne 32
    For Col = 3 To 9 Step 3
        ListBox1.AddItem Cells(Lig, Col)
        ListBox1.List(ListBox1.ListCount - 1, 1) = Cells(Lig, Col + 1)
        ListBox1.List(ListBox1.ListCount - 1, 2) = Cells(Lig, Col + 2)
    Next Col
 
Re : Charger un listbox multicolonnes...

Bonsoir GAEL et CBEA...

Merci à vous deux pour vos réponses rapides...

Je n'ai pas réussi avec le code de GAEL (ceci est sûrement dû à mes connaissances encore limités en VBA...) mais le code de CBEA fonctionne parfaitement bien pour mes besoins.

Encore une fois, merci à vous deux pour votre aide !

Blord
 
Re : Charger un listbox multicolonnes...

Bonsoir à tous,

Mais non ce ne sont pas tes connaissances en VBA, j'ai confondu Listbox et listview.

Heureusement que d'autres sont plus efficaces, merci Cbea

@+

Gael
 
Notre forum d’entraide est 100 % gratuit et le restera.
Aucune formation payante, aucun fichier à acheter, rien à vendre. Mais comme tout site, nous devons couvrir nos frais pour continuer à vous accompagner.
Soutenez-nous en souscrivant à un compte membre : c’est rapide, vous choisissez simplement votre niveau de soutien et le tour est joué.

Je soutiens la communauté et j’accède à mon compte membre
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…