Liste de chiffre dans un ComboBox en Vba

Bonjour,

Comment peut-on mettre une liste de chiffre dans un combo sans être obligé de tous les taper dans une feuille Excel.
Je souhaites que mon Combo est une liste de 1 à 200.
Pouvez-vous m'expliquer comment faire s'il vous plait ?
Merci par avance

Bonjour,

je l'écrirai comme cela :

Code:

---

1 2 3

For i = 1 To 200 ComboBox1.AddItem (i) Next

---

Deux manières : Soit tu crées un tableau(200)
For i = 1 to 200 : Tablo(i) = i :Next
tableau que tu affectes à ta liste avec List()
Listbox1.list() = Tablo
Soit tu ajoutes les éléments un à un dans une boucle avec AddItem
Bonne journée

Bonjour Ouskel'n'or,

Ce n'est pas une ListBox mais un Combo, est-ce la même procédure ?

C'est idem tout pareil ;)

Ok merci. Dois-je faire une déclaration au préalable du genre I as Long ou autre ?
Cette procédure je la met dans le code de la Combo ?
Beaucoup de question, mais je tatonne encore en Vba.
J'ai tapé ce code (dans le combo), mais ça ne marche pas
Merci pour ta patience et ton aide

Code:

---

1 2 3 4 5 6 7

Private Sub Cb4_Activate() Dim I As Long For I = 1 To 200 tablo(I) = I Next FrmOp.Cb4.List() = tablo End Sub

---

Bonjour,

ces bout de code sont à insérer dans l'activate du userform.

Ouskel'n'or, je pense que faire le for directement sur la combobox serai plus rapide que le faire dans un tableau, et ensuite l'intégrer dans la combo.;)

Citation:

---

Envoyé par zandru

Ouskel'n'or, je pense que faire le for directement sur la combobox serai plus rapide que le faire dans un tableau, et ensuite l'intégrer dans la combo.;)

---

Je pense le contraire mais pour un tableau de 200, je crois qu'à la milli-micro-seconde près, ça va être tout pareil :mouarf:
(je te concède qu'avec AddItem ça "paraît" plus simple ;))

Merci les champions ça marche.
Encore un problème de réglé.:king: