This should do the job
Private Sub Form_Load()
DoCmd.RunCommand acCmdRecordsGoToNew
For i = 1 To 5
DoCmd.GoToRecord , , acPrevious
Next i
End Sub
--
There's ALWAYS more than one way to skin a cat!
Answers/posts based on Access 2000/2003
Message posted via AccessMonster.com
http://www.accessmonster.com/Uwe/For...forms/201005/1