Bonjour,
J'ai un code qui me permet d'ajouter des lignes dans mon tableau :
Sub ajoutLigne()
Dim nvlLig As Long
nvlLig = Range("A" & Rows.Count).End(xlUp).Row + 1
Rows(nvlLig).Insert
ActiveSheet.ListObjects("Tableau1").Resize Range("A1:C" & nvlLig)
End Sub
Et la première colonne est un numero.
Ligne 1 : 6200
Ligne 2 : 6201
Ligne 3 : 6202
Ligne 4 : 6203 etc
J'aimerais que la ligne qui s'ajoute, affiche automatiquement le numéro du dessus + 1
Si vous savez comment faire, de mon coté je n'en ai aucune idée.
Merci beaucoup =)