listbox

  • Initiateur de la discussion JMV
  • Date de début
J

JMV

Guest
bonjour

comment definir la propriété Rowsource d'un listbox pour un tableau pour que chaque ligne de données rajoutées soit prise en compte.
La propriété doit etre définie lors de l'initialisation du useform

merçi JMV
 
F

Fred

Guest
A l'ouverture de ton userform tu fais :

Private Sub UserForm_Initialize()
Sheets("Feuil1").Select
DerniereListbox1 = Range("A1").End(xlDown).Address
' Plage de données pour afficher dans liste déroulante
Listbox1.RowSource = "A1:" & DerniereListbox1
' Afficher le premier element de la liste
Genre.ListIndex = 0

End Sub


Et si tu as un bouton valider sur ton userform tu mets ca pour valider tes donnees :

Private Sub Valider ()
Index = Listbox1.ListIndex
ChoixListbox1 = Listbox1.List(Index)
' Stockage du choix effectué dans la liste déroulante en C2
Range("C2").Value = ChoixListbox1
End Sub
 

Discussions similaires

Réponses
9
Affichages
653