Remplir des cellules selon les lignes choisies sur un listbox

Résolu
chrisdemontigny Messages postés 70 Date d'inscription   Statut Membre Dernière intervention   -  
chrisdemontigny Messages postés 70 Date d'inscription   Statut Membre Dernière intervention   -
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

2 réponses

  1. pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 773
     
    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
  2. chrisdemontigny Messages postés 70 Date d'inscription   Statut Membre Dernière intervention  
     
    et bien merci bcp!
    J'ai trouvé entre temps par une solution proche de la tienne
    0