ajouter des valeurs dans une ComboBox (zone de liste modifiable)

Bonjour,

Peut qqun me dire comment ajouter des valeurs dans une "zone de liste modifiable" (ComboBox). Dans UserForm_Initialise() je mets le code suivant:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

TestTruc.ComboBox1.AddItem "jan" TestTruc.ComboBox1.AddItem "feb" TestTruc.ComboBox1.AddItem "mar" TestTruc.ComboBox1.AddItem "apr" TestTruc.ComboBox1.AddItem "may" TestTruc.ComboBox1.AddItem "jun" TestTruc.ComboBox1.AddItem "jul" TestTruc.ComboBox1.AddItem "aug" TestTruc.ComboBox1.AddItem "sep" TestTruc.ComboBox1.AddItem "oct" TestTruc.ComboBox1.AddItem "nov" TestTruc.ComboBox1.AddItem "dec

---

"

mais en executant la userform j'ai toujours rien dans la liste... Help (:

merci d'avance

le code à l'air bon , du moment que ton userform se nomme TestTruc .. (si tu met cela dans UserForm_Initialise tu n'as pas besoint de préciser TestTruc;..)

Bonjour,

code bon sauf si .... la combobox est liée à une source de données...

EDIT :

et si elle n'est pas liée, que penserais-tu d'utiliser ceci :

Code:

---

1 2 3

For i = 1 To 12 ComboBox1.AddItem Format("01/" & i & "/2000", "mmm") 'ou (à ton choix) : Combo1.AddItem Format(DateSerial(1, i, 1), "mmm") Next

---