recherche par date vba excel

bonjour
j'ai un classeur excel qui sert a archiver le courrier départ par un numero chrono.
colonneA numero chrono
colonneB date départ
colonneC nom expéditeur
colonneD type de courrier
colonneE objet du courrier
colonneF destinataire
tout ça se rempli via un userform.
mais je voudrais integrer une recherche soit par le numero soit par la date.
donc dans mon userform j'ai un textbox ou la personne rentre soit le numero chrono ou la date et lorsqu'il clic sur ok , j'aimerai que les éléments rechercher dans la feuille s'inscrive dans les combobox correspondant!!!!
1 pour le numéro chrono
1 pour la date
1 pour le nom
etc.......
si quelqu'un peu m'aider à finaliser mon projet

merci d'avance

Tu appelles trois fois cette macro avec la donnée cherchée, le nom du combo et le N° de colonne

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

Sub Recherche(Nom, NomCombo, NoCol) Dim maVal As Variant, c As Variant, NoLigne As Long With Worksheets("Feuil1").Range(NoCol & ":" & NoCol) 'plage de recherche Set c = .Find(Nom, LookIn:=xlValues) If Not c Is Nothing Then 'Si une donnée répondant au nom de Nom... Do '... on rentre dans la boucle NoLigne = c.row '******* ajouté ******** UserForm1.Controls(NomCombo).AddItem c Set c = .FindNext(c) Loop While Not c Is Nothing And c.Row > NoLigne End If End With Set c = Nothing End Sub

---

Le code de ton bouton de recherche :

Code:

---

1 2 3 4 5

Sub LeBoutonRecherche_Click() Call Recherche("Marcel", 3, "ComBoNom") ' "ComBoNom" : nom du combo entre guillemets Call Recherche("12/03/07", 2, "ComBoDate") ' 2 : No de Colonne de la recherche Call Recherche("0123456", 1, "ComBoNoChrono") ' "0123456" l'item cherché End sub

---

Tu risques d'avoir un pb si la date est mal formatée. Le format de cellule modifie la saisie. Tu peux saisir "1/3/07" et avoir affiché dans la cellule "01 mars 2007". Après saisie dans l'userform, tu devras formater tes dates en VBA pour les insérer dans les cellules, non dans Format de cellule dans Excel, et effectuer tes recherches selon le même format.
Mais c'est une autre question... ;)

Merci beaucoup pour ta réponse
demain j'essai ça et je te tiens au courant si pb
bonne soirée à toi

J'ai oublié une ligne dans le code, je l'ai ajoutée, tu corriges ;)