dernière ligne vide d'un tableau erronée en VBA

[herve62]

Bonsoir
Ce fichier (vidé exprès ) ne donne plus la dernière ligne en 2 mais 3 ??? lors de la "validation" de saisie de l'usf
J'ai fait un test via le module c'est bien 2 avec forcément la même instruction ... de base
C'est un fichier de reprise , peut être le tableau a t-il été mal construit .. ??
pour tester :
clik en col A > USF : juste mettre un nom + un truc > Validation
Résultat : insertion en ligne 3 ??? Pourquoi ?? comme dab .. un truc simple doit m'échapper !!
Merci à vous !!

 

[herve62]

Bonjour le forum
@Dranreb :

Private LOt As ListObjet

me donne une erreur immédiate si je mets en en-tête de "saisie" ?
et pour "Cel.ListObject.ListRows.Count " on fait dlg=.range("A1").ListObject.ListRows.Count ? ( erreur aussi )

 

[Dranreb]

Bonjour.
Erreur de ma part, c'est: LOt As ListObject

 

[herve62]

Ok , plus d'erreur ; Sinon : Lend = .Range("a1").ListObject.ListRows.Count me donne 0 si tableau vierge ?
As tu testé dans mon fichier joint en #1 ?

 

[Dranreb]

Oui, c'est normal.
Non, je ne l'ai pas testé.