Placer le nouvel enregistrement a la ligne

Question

Bonjour c'est encore moi

j'ai une petite question

j'ai un code ci-dessous pour valider mes données saisie dans l'userform sur la feuille active et sur la synthese qui fonctionne.

 Range("E3") = TextBox3.Value
 lig = Sheets("Synthese").Range("C65536").End(xlUp).Row + 1
Sheets("Synthese").Range("C" & lig) = UserForm3.TextBox3

Toutefois si toutes les case de mon userform ne sont pas rempli j'ai un decalage dans la synthese.

exemple: je valide et cela devrais aller sur la ligne 10 (tout)

la quand je valide il y as une parti sur la ligne 10 une autre sur la 9 car a la saisie precedente je n'est pas remplis tout les champs .

avez vous une soulution a ce probleme ?

Merci de votre aide

Ps: en attendant dans les textbox de l'userform j'ai mis un espaces pour que les cellules ne soit pas vide.

h2so4 · Accepted Answer

Bonjour, réponse avec quelques jours de retard lig=cells(rows.count,3).end(xlup).row+1 Sheets("Synthese").cells(lig,5)=textbox3...

h2so4 · Answer

Plutôt que de recalculer le numéro de la nouvelle ligne pour chacune des tes textboxes, tu calcules ton numéro de ligne en début de validation, sur base de la colonne, qui t'indiquera avec certitude la dernière ligne utilisée (une colonne avec un champ qui est toujours rempli, par exemple un n° d'identification). lig=cells(rows.count,3).end(xlup).row+1 cells(lig,1)=textbox1 cells(lig,2)=textbox2 cells(lig,5)=textbox3 etc .....