j'ai beau regarder plusieurs anciens post, je n'arrive pas à créer une liste box dans un userform ki récupére les données une dans plage de cellule...
mes données à afficher dans la liste box se trouvent dans A6:A10
de la feuille récapitulatifnum du classeur suiviqualitécolorimètrie...
sous excel 97...
j'ai essayé plusieurs codes dont le meilleur me semble être celui-ci mais ma listbox reste vide..:
Private Sub ListBox1_Click()
ListBox1.VALUE = récapitulatifnum.xls! & Sheets(récapitulatifnum).Range("A6:A10").Address
End Sub
ou sinon :
Private Sub ListBox1_Click()
fiche.ListBox1.ListFillRange = "récapitulatifnum!A6:A10"
End Sub
C'est res simple fait un clik droit sur ta litbox clik sur propriété ensuite dans "rowsource" tu met tas source donc dans ton exemple :
------------récapitulatifnum!A6:A10 -----------------
Copie ce code dans rowsource tu devrai avoir le resultat voulu,
@+, romfret
Cells(1,1).Value = ListBox1.Value
Si c'est la case A2 ca donnera :
Cells(1,2).Value = ListBox1.Value
si c'est la case B2 :
Cells(2,2).Value = ListBox1.Value
ETC ETC ...