Listbox deux colonnes affichée dans deux cellules Excel

Résolu
chrisdemontigny Messages postés 64 Date d'inscription   Statut Membre Dernière intervention   -  
chrisdemontigny Messages postés 64 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

j'ai trouvé le code suivant pour récupérer une plage de cellules dans une listbox:

Option Explicit

Private Sub UserForm_Initialize()
    Dim TabTemp As Variant
    
    'Chargement d'une plage de cellules dans la variable TabTemp
    TabTemp = Sheets("40101").Range("A1:b11").Value
    
    'Définit le nombre de colonnes pour la ListBox.
    ListBox1.ColumnCount = UBound(TabTemp)
    'Chargement du tableau dans la ListBox
    ListBox1.List() = TabTemp
End Sub


La première étape est donc faite.

Maintenant que j'ai fait le choix dans ma listbox, je voudrais que le choix effectué dans ma listbox des deux cellules soit affiché dans deux autres cellules, par exemple C4 et C5.
Si je demande listbox1.value, il ne me met que la première value.

Pourriez-vous m'aider?
N'hésitez pas à me dire si je ne suis pas clair.

Merci bcp par avance

1 réponse

michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 314
 
Bonjour

pour extraire la 2° colonne d'une listbox à N colonnes
essies
range("B2")=ListBox1.List(ListBox1.ListIndex, 1)
2°col=1 car on commence à 0

D'après un tuto précieux pour le VBA avec les userforms:
https://silkyroad.developpez.com/VBA/ControlesUserForm/#LII-G
Michel
0
chrisdemontigny Messages postés 64 Date d'inscription   Statut Membre Dernière intervention  
 
Merci beaucoup
0