Comment afficher une liste dans ListBox ou ComboBox

Bonjour à tous,
Débutant en VBA: Comment j'insère une liste dans ListBox ou ComboBox, sans lien avec un classeur ou une feuille:
J'ai fait ceci:

Code:

---

1 2 3 4 5 6 7 8 9

Private Sub UserForm1_Initialize() With Me.ListBox1 .AddItem ("red") .AddItem ("red") .AddItem ("blue") .AddItem ("green") End With   End Sub

---

Rien ne s'affiche?
merci pour vos réponses

bonjour, pour une combo..

Code:

---

1 2 3

Private Sub UserForm_initialize() combobox1.List = Array("red", "red", "blue", "green") End Sub

---

Merci Laetitia,
ça marche pour ComboBox, mais pour listBox je n'ai pas trouvé, à part créer un CommandButton pour l'enclencher.

re, pour une listbox c'est pareil !!!!

Code:

---

1 2 3

Private Sub UserForm_initialize() ListBox1.List = Array("red", "red", "blue", "green") End Sub

---

Re-merci, Donc si simple:oops:, est-ce que tu peux me dire ce qui est faut dans mon premier message?

j'avai fait la meme erreur que toi :
tu a écrit
Private Sub UserForm1_initialize()
où UserForm1 est le nom de ta form

alors qu'il faut écrire
Private Sub UserForm_initialize()

où UserForm sert juste à dire que c'est à l'initialisation d'une userform

Yes!!!!! maintenant c'est clair. Merci mazuno.