[VBA] Combobox comment le remplir

Fermé
Sirius91 Messages postés 11 Date d'inscription samedi 13 janvier 2007 Statut Membre Dernière intervention 24 janvier 2007 - 14 janv. 2007 à 16:12
 hasnaa - 10 avril 2008 à 12:07
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 jeudi 4 novembre 2004 Statut Modérateur, Contributeur sécurité Dernière intervention 30 octobre 2019 3 567
14 janv. 2007 à 16:22
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 samedi 13 janvier 2007 Statut Membre Dernière intervention 24 janvier 2007 11
14 janv. 2007 à 16:56
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 jeudi 4 novembre 2004 Statut Modérateur, Contributeur sécurité Dernière intervention 30 octobre 2019 3 567
14 janv. 2007 à 19:21
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 samedi 13 janvier 2007 Statut Membre Dernière intervention 24 janvier 2007 11
14 janv. 2007 à 20:21
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 samedi 13 janvier 2007 Statut Membre Dernière intervention 24 janvier 2007 11
14 janv. 2007 à 17:12
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
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