Comment remplir un combobox à partir d'un colonne
dalibma
Messages postés
38
Date d'inscription
Statut
Membre
Dernière intervention
-
eriiic Messages postés 24603 Date d'inscription Statut Contributeur Dernière intervention -
eriiic Messages postés 24603 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour,
j'ai la colonne A est rempli de A1 jusqu'a A1000 sur la feuil2
sur la feuil1 j'ai créer j'ai bouton qui affiche un userform qui porte un combobox (type zone de liste modifiable )
ce combobox doit contenir les données de colonne A ; j'ai lancé ce code pour le combobox :
Private Sub UserForm1_Initialize()
ComboBox1.List = Worksheets("Feuil2").Range("A2:A20").Value
End Sub
le pb : je ne trouve pas les données sur la combobox.
merci de m'aider
j'ai la colonne A est rempli de A1 jusqu'a A1000 sur la feuil2
sur la feuil1 j'ai créer j'ai bouton qui affiche un userform qui porte un combobox (type zone de liste modifiable )
ce combobox doit contenir les données de colonne A ; j'ai lancé ce code pour le combobox :
Private Sub UserForm1_Initialize()
ComboBox1.List = Worksheets("Feuil2").Range("A2:A20").Value
End Sub
le pb : je ne trouve pas les données sur la combobox.
merci de m'aider
5 réponses
Bonjour,
La syntaxe est correcte. Il faudrait mettre ta ligne de code dans un Sub que tu appelles.
Et pour l'initialiser à l'ouverture la mettre dans Private Sub Workbook_Open()
Sinon merci de déposer le fichier xls (réduit au nécessaire et anonymisé) sur cjoint.com et coller ici le lien fourni.
eric
En essayant continuellement, on finit par réussir.
Donc plus ça rate, plus on a de chances que ça marche.(devise Shadok)
En plus du merci (si si, ça se fait !!!), penser à mettre en résolu. Merci
La syntaxe est correcte. Il faudrait mettre ta ligne de code dans un Sub que tu appelles.
Et pour l'initialiser à l'ouverture la mettre dans Private Sub Workbook_Open()
Sinon merci de déposer le fichier xls (réduit au nécessaire et anonymisé) sur cjoint.com et coller ici le lien fourni.
eric
En essayant continuellement, on finit par réussir.
Donc plus ça rate, plus on a de chances que ça marche.(devise Shadok)
En plus du merci (si si, ça se fait !!!), penser à mettre en résolu. Merci
https://www.cjoint.com/?DCFrdRDN4UN