Salut à tous,
Denis, j'ai vite fait regardé ton fichier , je crois que ton problème vient toujours de là:
TextBox2.Value = Sheets(1).Range("c65535").End(xlUp).Row +1
Le caractère en gras était chez toi un 1(un le chiffre), alors que c'est un L miniscule...
Donc forcément ça plante...
Enfin je crois car plus d'erreur chez moi, après est ce que ça fera tout ce que tu en attends c'est un autre problème...
@+ Steplof