Try This it worked for me. It added a row with the numbers i wanted.
You must compact database each time you do it.
add a button on a form and enter this in the on click.
You can use it to rest the Auto Number eg to 999
Dim db As DAO.Database
Dim rst As DAO.Recordset
Dim i, x As Variant
Set db...