Variation valeur texbox par rapport combobox

Bonjour
Voila mon problème (surement simple à résoudre mais impossible de trouver un tuto ).
http://s213307955.onlinehome.fr/exel.jpg

Je voudrais que quand je selectionne un produit dans ma combobox ça affiche le prix qui correspond à celui-ci dans ma textbox.


Merci par avance
Cordialement cabridous

Salut,

Code:

---

1 2 3 4 5 6 7

Dim i As Long   For i = 2 To Range("A65536").End(xlUp).Row If Range("A" & i).Value = ComboBox1.Value Then TextBox1.Value = Range("B" & i).Value End If Next

---

à mettre dans l'event

Code:

---

ComboBox1_Change()

---

.



Je te conseille d'aller jeter un œil ici, ça pourra te servir : http://silkyroad.developpez.com/VBA/ControlesUserForm/

A+

Salut cabridous et le forum
On n'est plus en maternelle et les images....
Sur la macro Change de ta combo fait un code du style

Code:

---

1 2 3 4 5 6 7 8

Dim Cel as Range '... For each cel in range([A1],Cells(Rows.count,"A").end(xlUp)) if cel =combobox then textBox=cel.offset(0,1) exit for End if next Cel

---

A+

Bonjour,

Si les données sont bien rangées il y à aussi le moyen d'utiliser la valeur de ListIndex et de s'en servir pour le prix.
la première donnée ayant le N° 0, dans l'event ComboBox1_Change() tu peux mettre le code suivant

Code:

---

TextBox1.Value = worksheet("donnees").cells(2 + ComboBox1.ListIndex, 2)

---

Qu'en pensez vous ?

Merci à tous pour vos réponse ça marche nikel