Salut EngueEngue,
Merci pour ta réponse super rapide ...
Mais j'ai oublié de préciser que j'avais deja un code, que je souhaitais completer
voici mon code
Private Sub CommandButton1_Click()
'copie des infos de l'userform sur la feuille search
With Sheets("search")
Ln = .Range("A" & Rows.Count).End(xlUp).Row + 1
.Cells(Ln, 1).Value = CB_product_code.Value
.Cells(Ln, 2).Value = TextBox1_CCR
.Cells(Ln, 3).Value = TextBox2_date
End With
Peux-tu me le compléter avec ton code, car j'avoue que je n'y arrive pas ...
Merci pour ton aide