Incrémentation d'une colonne en +1

Bonjour,

J'essaye de créer un formulaire assez compliqué, en rentrant des donnée, elles viendrons s'ajouter a deux tableurs, mais pour les repérés parmi toutes j'aurais voulue utiliser un ID donc a chaque données saisie faire un ID+1 mais je m'y perd. Pour faire clair :

je rentre des données dans un formulaire j'appuis sur le bouton de saisie, a ce moment je demande donc que les données saisie passe sur les tableau dans les cellules que je choisie grâce a un activecell.offset mais je ne trouve pas comment faire que dans la colonne A a chaque saisie ça me mette +1

Merci de votre aide

Tres Respectueusement

Jfin

Bonjour

Un truc du genre

Range("A" & Range("A" & Rows.Count).End(xlUp).Row + 1) = WorksheetFunction.Max(Range("A:A")) + 1

Crdlt

super !

MErci bcp !

Ok.