After a great deal of searching and tying many different things, I found the code below as a way to stop at the last record.
Dim intNewRecord As Integer
Forms![Wine SF1]![sf-Wines].SetFocus
DoCmd.GoToRecord , , acNext
intNewRecord = IsNull(Forms![Wine SF1]![sf-Wines]![WinesID])
If intNewRecord...
I have 8 small tables that I have consolidated into a form with tabs for each table. I do not like the standard record selectors at the bottom of the form and created buttons for all the selections. After a great deal of searching and trial and error is was able to get one set of buttons work...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.