Remplir des cellules selon les lignes choisies sur un listbox

Résolu/Fermé
chrisdemontigny Messages postés 64 Date d'inscription mercredi 19 septembre 2012 Statut Membre Dernière intervention 17 mars 2015 - 17 sept. 2014 à 23:25
chrisdemontigny Messages postés 64 Date d'inscription mercredi 19 septembre 2012 Statut Membre Dernière intervention 17 mars 2015 - 20 sept. 2014 à 11:17
Bonjour,

je reprends vba sur excel après 1.5 an d'arrêt ; je me retrouve bloqué ce soir sans savoir comment aller plus loin, j'espère que je ne vais pas me décourager comme début 2013.

J'ai une question, je pense, qui est simple:

comment afficher sur une feuille excel les éléments sélectionnés dans un listbox

Merci par avance

A voir également:

2 réponses

pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 751
18 sept. 2014 à 10:33
Bonjour,

Supposons que tu veuilles tes valeurs, sélectionnées dans la ListBox1', dans la Feuil1, colonne C, à partir de la première cellule vide de cette colonne :


Dim i As Integer
With Sheets("Feuil1")
    For i = 0 To ListBox1.ListCount - 1
        If ListBox1.Selected(i) = True Then 
            .Range("C" & .Range("C" & Rows.Count).End(xlUp).Row + 1) = ListBox1.List(i)
        End If
    Next i
End With

0
chrisdemontigny Messages postés 64 Date d'inscription mercredi 19 septembre 2012 Statut Membre Dernière intervention 17 mars 2015
20 sept. 2014 à 11:17
et bien merci bcp!
J'ai trouvé entre temps par une solution proche de la tienne
0