Open Form to NULL Field 1

[mizenerman]

Hello all. I find myself yet again needing your expertise.

I have a table that is pre-numbered in lieu of an autonumber process(because the autonumber won't work for our current patient records due to the fact that historical patient information is based on a manual numbering system). I would like the form used to enter data into the table to open to the next blank record on Open. The code I have thus far isn't working - no error message or anything. I've searched every forum and seems my issue is unique (or wrong). The code is:

Private Sub Form_Open(Cancel As Integer)
If IsNull(Me.Last_Name) Then
DoCmd.GoToRecord , , acNext
End If
End Sub

As usual any help provided is greatly appreciated.

 

[PHV]

Any code referencing controls should be moved from the Open to the Load event procedure of the form.

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[mizenerman]

Thanks PHV. That's good info to know and I'll be sure to log it away.

I moved that code to the OnLoad Event but still getting the same response? Any ideas?

Thanks again.

 

[PHV]

What about something like this ?

Me.Recordset.FindFirst "Trim([last name field] & '')=''"

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[mizenerman]

You're the man PHV!! That's what I needed. Thank you so much for coming thru for me...again.