Bonjour à tous,
J'utilise un code (de Boisgontier je crois !) pour faire une recherche intuitive.
le voici :
Me.ListBox1.Clear
i = 0
NbCol = [MaBD].Columns.Count
Set plage = [MaBD].Resize(, 1)
Set c = plage.Find(Me.TextBox1, , , xlPart)
If Not c Is Nothing Then
premier =...