Merci encore pour ton aide.
Pour la validation j'ai fait comme ceci:
Private Sub TextBox1_KeyUp(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If TextBox1 = "" Then Lg = 0
Set cel = Sheets("TRI").Range("C:C").SpecialCells(xlCellTypeConstants).Find _
(TextBox1, LookIn:=xlValues, lookat:=xlWhole)
If cel Is Nothing Then Exit Sub
Lg = cel.Row
If KeyCode = 13 Then CommandButton4_Click
End Sub
Et en plus j'ai passé l'option Défaut en true dans le bouton.
Cela à l'air de fonctionner.
Qu'en penses tu?
Autre problème: afin de ne pas faire de bétise, je verouille chaque colonne "TRI" qui est fini mais après je ne peux plus utiliser le userform, j'ai une erreur. Sais tu comment faire?