VBA: remplir combobox à partir d'une colonne

Résolu

alena20 Messages postés 24 Statut Membre -
alena20 Messages postés 24 Statut Membre - 8 nov. 2012 à 13:44

Bonjour,

Je veux remplir le combobox dans l'userform à partir d'une colonne et j'utilise ce code


Private Sub UserForm_Initialize()
Dim i As Long

  For i = 2 To 20
      ComboBox1.AddItem Sheets("ListOfParameters").Cells(i, 1)
Next i

UserForm1.Show

End Sub

il y une erreur 'Objet requis' qui apparait, je ne comprends pas la cause de cette erreur

Merci de votre aide
Cord,
alena

Afficher la suite

6 réponses

Réponse 1 / 6

Meilleure réponse
La meilleure réponse est la réponse qui a été validée par nos équipes.
eriiic Messages postés 24581 Date d'inscription Statut Contributeur Dernière intervention 7 281
Bonjour,

ou bien :
```
Private Sub UserForm_Initialize()
    ComboBox1.List = worksheets("Feuil1").Range("A2:A20").Value
End Sub
```
eric
11
Réponse 2 / 6
f894009 Messages postés 17417 Date d'inscription Statut Membre Dernière intervention 1 717

Bonjour,
Quand vous avez l'erreur, click sur debugage: sur quelle ligne s'arrete le programme?????
2
1. alena20 Messages postés 24 Statut Membre 2
  
  C'arrete sur la ligne ComboBox1.AddItem Sheets("ListOfParameters").Cells(i, 1)
  
  0
2. f894009 Messages postés 17417 Date d'inscription Statut Membre Dernière intervention 1 717
  
  Bonjour a vous tous et toutes,
  
  Votre feuille de calcul a bien le nom que vous avez ecrit: Sheets("ListOfParameters")?????
  
  Votre combobox s'appelle bien Combobox1???????
  
  0
Réponse 3 / 6
pijaku Messages postés 13513 Date d'inscription Statut Modérateur Dernière intervention 2 773
Bonjour,

Essayez ceci :
```
Private Sub UserForm_Initialize() 
Dim i As Long 
With Sheets("ListOfParameters") 
  For i = 2 To 20 
      ComboBox1.AddItem .Cells(i, 1) 
  Next i 
End With 
End Sub
```
Cordialement,
Franck P
0
1. alena20 Messages postés 24 Statut Membre 2
  
  J'essayé votre code mais ca tojours marche pas
  
  0
Réponse 4 / 6
alena20 Messages postés 24 Statut Membre 2

Merci eric, mais le pb se persiste. Ou est-ce que il faut que je places le code dans le ThisWorkbook ou Module?
0
1. pijaku Messages postés 13513 Date d'inscription Statut Modérateur Dernière intervention 2 773
  
  Dans le module de l'Userform.........
  
  0
2. alena20 Messages postés 24 Statut Membre 2
  
  Merci, ca marche maintenent!
  
  0
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Réponse 5 / 6
alena20 Messages postés 24 Statut Membre 2

Bonjour,

Merci pour toutes vos essaies. Voici le document peut etre ca nous aidera
https://www.cjoint.com/?BKinIGi8Hph

Cord,
alena
0
Réponse 6 / 6
alena20 Messages postés 24 Statut Membre 2

Merci à tous. L'erreur ka ete que j'avais mis le code dans le module et il faullait le mettre dans le code d'userforme.
0

VBA: remplir combobox à partir d'une colonne

6 réponses

Discussions similaires

Newsletters