Remplir une combo box

tut -  
Polux31 Messages postés 7219 Statut Membre -
Bonjour,

Question idiote mais cela prendra peu de temps pour vous pour répondre.
J'aimerai avoir une combobox proposant les chiffres de 1 à 4 comment dois je l'écrire ?

3 réponses

  1. symff Messages postés 24 Statut Membre
     
    En quel langage ?
    0
  2. symff Messages postés 24 Statut Membre
     
    Oulaa, désolée mais pour le peu que j'en ai fait, je peux pas vraiment t'aider.

    Il faut déjà faire une boucle

    Dim i
    For i = 1 To 4
            [...]
    Next


    Normalement il y a un truc du genre
    Nom_de_la_combo.AddItem
    0
    1. Polux31 Messages postés 7219 Statut Membre 1 204
       
      bonjour,

      Pour compléter la proposition de symff :

      Dim i As Integer
      
      For i = 1 To 4
           Combox1.AddItem i
      Next i



      ;o)
      0
    2. symff Messages postés 24 Statut Membre
       
      Tout simplement ;-)
      0
    3. Polux31 Messages postés 7219 Statut Membre 1 204
       
      tu as donné la soluce, je n'ai fait que la remise en forme .

      ;o)
      0
    4. tut
       
      sa marche pas !! je sais pas pourkoi !
      voila ce que j'ai écrit:

      Private Sub main()
      Dim i As Integer
      For i = 1 To 4
      UserFormMat.ComboBox1.AddItem i
      Next i
      End Sub

      Sachant ke je ne me suis pas tromper de UserForm elle s'appelle bien UserFormMat
      0
    5. Polux31 Messages postés 7219 Statut Membre 1 204
       
      Où est cette procédure main() ... de plus comment est-elle appelée ?

      Le plus simple est de mettre le remplissage du combox à l'ouverture du UserForm :

      Private Sub UserForm_Initialize()
      Dim i As Integer
      
          For i = 1 To 4
              ComboBox1.AddItem i
           Next i 
      End Sub


      ;o)
      0