Although I realise this might not be practical if a very high starting number were required, but you could always create a load of dummy records until you reach x-1, where x is the starting number that you want, then delete all the dummy records. This could be done manually, but VBA code would be worth writing, especially if you wanted a high starting number, (Say 1000).
dim dbs as database, rstTable as recordset
dim Acounter as variant
Set dbs = Currentdb()
Set rstTable = dbs.OpenRecordset("TableOne",dbOpenDynaset)
Acounter = 0
With rstTable
Do until Acounter = 999
.AddNew
![Field1]=1 ' Just to populate one field
' creating a valid record
.update
Acounter = Acounter +1
Loop
Acounter = 0
Do until Acounter = 999
.findfirst "[TableOne_ID] = " & Acounter
.Delete
Acounter = Acounter +1
Loop
.Close
End With
Hope this helps.