Insert n rows based on start number 1

[kiberu]

I need a method where I can insert e.g 100 rows into an existing table but with a new serial number for each row.

Kindly advise.

 

[PaulBricker]

Depends on what your Serial Number looks like but this should get you close

dim rst as DAO.Recordset
dim i as integer

Set rst = Currentdb.OpenRecordset("YourTable", dbOpenDynaset)
For i = 1 to 100
rst.AddNew
rst![SerialNumber] = YourSerialNumber + i
rst.Update
Next


Paul