UserForm + Recherche

[lynyrd]

Bonjour le Forum
Quel Code faudrait t'il rajouter à la combobox2 pour faire une recherche sur la date et le service afin d'afficher les résultats .
Merci

 

[jp14]

Re : UserForm + Recherche

Bonjour

Une solution parmi d'autres

Ci joint le fichier avec la procédure pour remplir le combobox2.
Ce combo est associé à un textbox pour avoir un affichage correct.
lig est une variable qui contient le numéro de la ligne sélectionnée.

A tester

JP

 

[lynyrd]

Re : UserForm + Recherche

Bonjour jp14
Merci de t'interesser au problème.
Lorsque je saisis par exemple 26/01/2010 GR SOIREE dans la combobox2,il faudrait que les données respectives s'affichent dans la combobox1 et dans les 2 textbox.
Merci

 

[jp14]

Re : UserForm + Recherche

Bonjour (re)

Code à rajouter dans

Private Sub ComboBox2_Change()
..........................................
Dim lig As Long
With Sheets("feuil1")
Me.ComboBox1.Value = .Range("b" & lig)
Me.TextBox1.Value = .Range("c" & lig)
Me.TextBox2.Value = .Range("d" & lig)
End With
............................................

A tester

JP

 

[lynyrd]

Re : UserForm + Recherche

Désolé jp14,mais ça ne fonctionne pas
A+

 

[jp14]

Re : UserForm + Recherche

Bonjour

Ci joint le fichier

JP

 

[lynyrd]

Re : UserForm + Recherche

Merci jp14 c'est impeccable.
A+