Me.Combobox1.AddItem "Lundi"
Me.Combobox1.AddItem "Mardi"

1. "Me" est l'objet "parent" de la combobox1, qui peut-être par exemple un feuille excel (=onglet) ou un formulaire.

Exemple : si ta combobox s'appelle ma_boite (tu peux la renommer dans le champ "name" des propriétés), et qu'elle est sur l'onglet "feuil1", il faudra la désigner comme feuil1.ma_boite
Tu peux donc avoir des combobox qui portent le même nom sur différents onglets (elles n'auront pas le même parent). Si tu appelles directement ma_boite, le VB ne saura pas qui appeler s'il y a ambiguité (sinon ça marche tu l'as vu, VB "devine" avec le contexte)

2. celà vient du fait que la propriété Columnwidths doit avoir une valeur supérieure à "Width". Tu peux laisser Columnwidths vide (sinon, si tu as plusieurs colonnes, il faut indiquer les différentes largeurs en points séparées par des points-virgules)

3. non, il faudra utiliser soit me.combobox.value, qui renvoit la valeur de la ligne sélectionné, et de la colonne indiquée par la propriété boundcolumn (par défaut 1 = première colonne)

Salut,

avant de recharger, vider la combo avec l'instruction :

Me.Combobox1.Clear

Lupin
~L'essentiel est invisible pour les yeux~
~On ne voit bien qu'avec le coeur~

Il y a deux façons pour mettre du contenu dans l'objet combobox
dans Microsoft Excel
les deux sont faciles à réaliser.
la première méthode consiste à utiliser la propriété du contrôle combobox nomée ROWSOURCE (voir les propriétés du cont^rôle lorsque vous cliquez sur celui-ci)
la seconde consiste à tapez du code en utilisant la propriété ADDITEM du contrôle Combobox
ce qui suit des exemples pour chaque methode.
(utilisation de données de la feuille Excel):
Exemple Première methode:
- dans les cellules A1 à A3 de la feuille Excel, entrez les textes Produit1, ProduitB, ProduitC.
-poser un label sur votre Userform.
- poser une zone de liste modifiable sur votre Userform
- recherchez la propriété RowSource de la ComboBox1 et entrez les références à la feuille Excel comme ceci: Feuil1!A1:A3 ( Il s'agit tout simplement de la source des données affichées dans la ComboBox)
- recherchez la propriété Value et donnez lui comme valeur: Choisir
- poser un bouton de commande et entrez le code suivant:
Private Sub CommandButton1_Click()
Label1.caption = ComboBox1.Value
End Sub
- exécuter le programme
Exemple Deuxième mèthode :
- sélectionnez la combobox1 vérifiez que la propriété ROWSOURCE est Vide.
- double-cliquez sur le userform pour accèder au code
- entrez le code suivant
Private Sub UserForm_Initialize()
ComboBox1.AddItem "New york"
ComboBox1.AddItem "Paris"
ComboBox1.AddItem "Oslo"
End Sub
- exécuter le programme
A chaque clic sur le bouton, l'intitulé affiche la valeur sélectionnée. l'utilisateur peut ajouter des entrées dans la combobox sans probléme.
Bon courage

Bonjour à tous,

J'ai également un petit problème avec une ComboBox de mon Userform qui fait appel (par le commande Rowsource) à une liste (nommée Date) qui contient des dates..

Le format de ces dates est défini comme ceci JJ/MM/AAAA dans excel.

Mon Problème : Lorsque que je déroule la liste dans la ComboBox et que je sélectionne une date, la valeur qui s'affiche n'est plus une date. J'en conclu que le format n'est pas conservé mais je ne sais pas comment faire.

Ce serait hyper sympa de m'aider...

Merci beaucoup

David

Pour mettre en forme une box ( combo ou text) il suffit d'ecrire ceci dans un sub change.

'pour une combobox(liste déroulante):

Private Sub ComboBox1_Change()
ComboBox1.Value = Format(ComboBox1.Value, "dd/mm/yyyy")

End Sub

'pour une zaone de texte:
TextBox1.Value = Format(TextBox1.Value, "dd/mm/yyyy")

Bonjour,

Il y a plusieurs possibilités d'exploiter la selection d'un utilisateur dans une combobox.
On peut exploiter directement le choix sur l'évènement change de la ComboBox, c'est à dire que dès que l'utilisateur séléctionne une valeur dans la liste de la ComboBox, il se passe quelque chose immédiatement :
Par exemple :

Private Sub Combo1_Change()
     Call AfficheSelect(Combo1.Text)
End Sub

Private Sub AfficheSelect(Byval str As Variant)
     MsgBox "Vous avez sélectionné : " & str & ".",,"Message"
End Sub

Private Sub boutonOk_Click()
     Call AfficheSelect(Combo1.Text)
End Sub

Bonjour,
J’ai une list box et j’utilise actuellement additem pour avoir ma liste. Seulement , je veus maintenant mettre ma liste sur une feuille excel à part (feuil1 par ex) . J’aimerai dès le démarrage de ma list box que celle ci prenne les valeurs qui seront stockées ds cette feuil1 mais je n’y arrive pas !
J’essai avec : Listbox.RowSource = (« A1 :A10 ») ms cela ne marche pas !
Help !

Salut,

Fais plutôt ça : Listbox.RowSource = ("A1 :A10")

bonne continuation

;o)

polux

Enfaite le problème est plus complexe… la feuille (qui est une feuille index) contient des éléments de A7 à A19 (la liste qui sera affichée ds la listbox) et donc dans mon code j’ai mis ListBox1.RowSource = "Feuil1!A7:A19"
Seulement il y a un nombre différent de jours pour chaque valeurs de A7 à A20 et il faut que lorsque les valeurs de la liste st sélectionnés ds l’index par la listbOx les nombres de jours s’affichent en face de leurs valeurs sur une nouvelle feuill excel !
Je ne sais pas comment faire mon index enfaite qui serait un tableau ? Car je dois mettre le nombre de jour par activités ds lindex du coup ! et si je sélectionne la valeur ds la listbox qui est située en A12 ds lindex je voudrais que cette valeur s’affiche ds une nouvelle feuille excel en B11 avc son nombre de jour correspondant C11 !!
Et le problème ( c’est le majeur) c’est que si quelqu’un est amené à faire une modification sur l’index, je n’arrive pas à faire en sorte que le code s’actualise ! Donc si une valeur est ajoutée avec un nombre de jour ds lindex comment faire pr qu’elle soit prise en compte ? car ma sélection ne va qu’à A19.. sachant qu’il ya d’autre valeurs après donc je npeu pas pas faire : « A7 : »

Voilà !! Enfaite en gros, il faut pouvoir ajouter, supprimer des valeurs sur une feuille index sans avoir à modifier le code !!! (sachant que pour chaque valeur est attribuée un nombre de jour différents ) ..oui je sais jme répète ms c pr être sur dme faire comprendre lol :s

En espérant que quelqu’un ait compris quelquechose….

Bonjour,

Pour connaitre le nombre de cellules indexées dans ta colonne A de la feuille 1, il suffit de les compter avant de remplir ta listbox. Je sais qu'il existe une méthode Excel mais je ne l'ai pas en tête. Néanmoins tu peux faire comme ça :

Dim i As Long
i = 7
While Worksheets("Feuil1").Range("A" & i).Value <> ""
   i = i + 1
Wend
ListBox1.RowSource = "Feuil1!A7:A" & i

Bonjour tout le monde,
y a qq'un à m'aider à faire le truc suivant:
je crée deux combobox, le 1er il affiche une liste des elements contenus ds la colonne A (par exemple)
mais a cet instant, je veux que si je selectionne un element contenu ds la colonne A,le deuxieme combobox affiche uniquement les elements de la colonne B mais leurs Ai sont les memes!!
j espere que vs avez compris qqchose
je serai tres tres reconnaissant a celui qui me repondra

votre cher ami simo

Bonjour,

Ben non pas trop compris là .... juste que tu veux que la 2ème combo se remplisse en fonction du choix de la 1ère combo ... mais je ne comprends pas ça : "uniquement les elements de la colonne B mais leurs Ai sont les memes!!"

Quel est le lien entre la colonne A et la colonne B ?

Ok je comprends mieux ... mais je ne vois pas l'utilité de 2 combobox ... à la limite je comprends pour la deuxième qui affiche les villes par pane comprends pas la première. Tel que tu décris ton besoin, dans la première combo va s'afficher 3 fois "France" et 2 fois "Maroc" ??? ... je vais quand même essayer de voir comment règler ça.

Peux tu me dire où se trouve tes combo ? sur une feuille Excel ou sur un UserForm ?

;o)

polux

Re,

Voilà un code à coller dans le module d'un userform. Il faut que tu colles 2 combo sur un userform. Tu renommes le premier (propriété name) cboPays et le deuxième cboVilles. Tu ne dois pas avoir de lignes vides dans la colonne A de ta feuille 1, sinon il faut changer la valeur de "i" dans UserForm_Initialize. Il faut mettre le numéro de la ligne contenant le premier pays.

Voilà le lien pour recup le code : http://cjoint.com/?dAqeutEC8w

bon courage

;o)

polux