Re : USERFORM Saisie / Modification
Salut sand13, salut le forum,
Premier point :
LigneMax = WorksheetFunction.CountA(Columns("A:A")) + 1
Deuxième point : (pas testé)
Utilise le même code que tu as écris pour le premier cas mais remplace lignemax par:
LigneMax = WorksheetFunction.Match(UserForm.FRONT,Columns("A:A"),0)
Il faudra sans doute ajouter un suivi d'erreur pour la fonction match...
Troisième point :
Remplace:
If Not Trouve Is Nothing Then
par:
If Not Trouve = "" Then