Bonjour le forum,
Pouvez vous m aider a resoudre ce probleme? Je vous en remercie d avance.

J'ai un userform comprenant 2 combobox et 2 textbox.
les combobox servent de criteres pour remplis les deux textbox
La base de donnée :
Nu Jour NBr coq nbr de pou
1 2006 100 200
2 2006 101 201
3 2006 102 202
4 2006 103 203
5 2006 104 204
6 2006 105 205
7 2006 106 206
1 2007 107 207
2 2007 108 208
3 2007 109 209
4 2007 110 210
5 2007 111 211
6 2007 112 212
7 2007 113 213

Mon probleme est de remplir les textbox avec les valeurs correspondantes au colonne 3 et 4.exemple : le 5 (combobox1) de 2006 (combobox2) apporte au texbox1 la valeur 104 et au textbox2 la valeur 205
J ai commencé ce code mais je suis completement perdu
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
Sub recherche()
Numero = ComboBox1.Value
année = ComboBox2.Value
With Sheets("feuil1")
nu = .Range("A20:A33")
Jour = .Range("B20:B33")
End With
 
TextBox1 = Evaluate("MATCH(1,(nu = Numero * Jour =année),1)")
 
End Sub
merci pour votre aide