[VBA] Combobox comment le remplir

Sirius91 Messages postés 11 Date d'inscription   Statut Membre Dernière intervention   -  
 hasnaa -
Bonjour,

Je suis étudiant en licence de gestion de production industrielle.
Je suis en alternance dans une societe pour laquelle je dois developper un outil de cotation sur Excel.
Je dois entre autres choses, utiliser les " Combobox"... Je suis debutant et je ne sais pas remplir les combobox.

J'ai regardé sur internet, les forums... je ne trouve pas comment on peut remplir les lignes de la combobox apartir d'un autre fichier Excel (qui servirais de base de données).

C'est pourquoi je solicite La solidarité CCM ! ! !
je souhaiterais savoir comment faire? Ou si vous pouviez m'orienter vers quelqu'un ou un lien qui pourrais m'aider?

Merci d'avoir prete attention a ma demande.


Cordialement sirius

5 réponses

lami20j Messages postés 21331 Date d'inscription   Statut Modérateur, Contributeur sécurité Dernière intervention   3 570
 
Salut,

voici un exemple banal
Private Sub UserForm_Initialize()
Dim i
    For i = 1 To 4
        ComboBox1.AddItem Sheets("a").Cells(i, 1)
    Next
End Sub
21
Sirius91 Messages postés 11 Date d'inscription   Statut Membre Dernière intervention   11
 
Merci de votre aide, toute fois rien n'apparait dans la combobox.
Pouriez vous m'aider sur ces questions ? :


1)pour rediger ce code, dois-je double cliquer sur la userform ou sur la combobox?

2)J'ai vu une personne sur le forum qui disait :

Nom_dela_combo . AddItem Ce_que_tu_veu_mettre

Le "Ce_que_tu_veu_mettre" pu se remplacer par l'emplacement de mon fichier base de données? si oui, comment faire?
7
lami20j Messages postés 21331 Date d'inscription   Statut Modérateur, Contributeur sécurité Dernière intervention   3 570
 
Re,

i c'est pour ligne
et 1 c'est pour colonne

donc je remplis la combobox avec le contenu de

cells(ligne1,colonne1)
cells(ligne2,colonne1)
.
.

dans l'exemple je m'arrête à 4 lignes


à savoir que la feuille excell a 65536 lignes et 256 colonnes
pour ne pas oublier :-)
nombre lignes   =  2 à la puissance 16
nombre colonnes =  2 à la puissance  8
5
Sirius91 Messages postés 11 Date d'inscription   Statut Membre Dernière intervention   11
 
encore merci!

il me reste toujour cette question: Peut on utiliser un autre fichier excel deja existant (base de données) pour remplir la combobox?

ensuite je serais fin prêt ..pour d'autres problemes!!

En tous cas merci pour l'aide!
0
Sirius91 Messages postés 11 Date d'inscription   Statut Membre Dernière intervention   11
 
sa y ai j'arrive a la remplir!!
mais je rentre les noms moi meme dans le programme. je souhaiterais qu'un "lien" se face vers un document Excel deja existant .

J'ai presque compris le code que vous m'avez donnée :

Sheets("Nom_de_la_feuille").Cells(i, 1)

"i" et "1" correspondent a quoi?

Je suis vraiment embeter, mon chef m'attend au tournant:-( .. Merci de votre aide.
4

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
hasnaa
 
bonjour tout le monde, je voudrais remplir un combobox a partir une base de données sql server, mais le probleme c'est que je dois recupérer les numeros de clients alors que les champs qui apparaitront au combobox sont les noms de clients.
merci pour tous
4