Go To Specific Record on Form

[burrina]

I am trying to go to a specific record on my form where RegID is the Primary Key and entertrans is the field I want to go to
entertrans is a yes/no checkbox that I am going to need to save the record and update the totals. If there are more records with this criteria then move to next record. Here is what I am trying:

If Not IsNull([frequency]) And Date > ([scheduleddte]) Then 'frequency is Daily,Weekly,etc... and scheduleddte is a Date
MsgBox "You Have Scheduled Transactions To Enter"
End If


With Me.Recordset


.FindFirst "RegID = " & entertrans 'entertrans is a yes/no checkbox
If .NoMatch Then MsgBox freqpayee & " was not found" 'freqpayee is the Payee for the transaction
End With

[June7]

The condition of RegID = entertrans is nonsense.

Also, use the RecordsetClone method.

Do you want to find the first record where entertrans is True or the first record where RegID matches freqpayee or both?

With Me.RecordsetClone
.FindFirst "entertrans=True" [or .FindFirst "RegID=" & freqpayee or .FindFirst "entertrans=True And RegID=" & freqpayee]
If .NoMatch Then
MsgBox freqpayee & " was not found"
Else
'do something
End If

[ssanfu]

"DATE" is a reserved word and shouldn't be used for object names. Plus it is not very descriptive - DATE of what?? Birth, Hired, Wedding,...?????

reserved words : http://allenbrowne.com/AppIssueBadWord.html



EDIT: Oops, my bad. Disregard.

I was reading too fast. I saw "Date > [ ]...." and I read "A field named Date is GT ....."

[June7]

I thought Date was the current date (Date()). VBA seems to insist on dropping the () for the Date() function.

[burrina]

Yes I noticed that too! I have now made the fields on the check register read only and am using a different form to enter the scheduled payments from.Makes more sense I think and will be easier to troubleshoot. I created a append query and a new table to store the data until I can figure out a way to get it back into my check register.Every once in a while Albert shows up but mostly it's just me and Forest! (Einstein and Gump)