Bonjour à toutes et tous,

Je cherche à récupérer dans la première ligne vide de mon tableau structuré les données saisies dans mon formulaire.

Quand je prends ce code cela fonctionne mais je mets en dur la cellule où récupérer la donnée
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
Private Sub TextBox_Date_Change()
 
Sheets("Feuil1").Activate
 
    Range("E25") = TextBox_Date.Value
 
End Sub
Quand je mets en place la recherche de la première cellule vide avec le code ci-dessous il se passe des choses bizarres.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
Private Sub TextBox_Date_Change()
 
Sheets("Feuil1").Activate
 
    DerCell = Cells(Rows.Count, "E").End(xlUp).Row 'Dernière cellule non vide
    Cells(DerCell + 1, "E") = TextBox_Date.Value 'DerCell + 1 => Première cellule vide
 
 End Sub
Pour chaque caractère saisi il y a la génération d'une ligne supplémentaire.
Ce qui fait que la date 24/07/23 est saisie sur 8 lignes (1 caractère rajouté par ligne). La 8ème ligne correspond au 24/07/23.

Comment puis je résoudre ce problème.

Cela se produit pour chaque item de mon formulaire.

Merci pour votre aide.

Philippe