DoCmd.FindRecord...How to use to match a field value

[trekgoes2malaysia]

When I open a form, I would like Access to go to a specified record
that meets the criteria in a certain field using the
'DoCmd.FindRecord' command in VBA. Unfortunately I have not had much
success this way. Can you explain how I can find a record based on
the contents of a field on the form. Below is my VBA code.

Private Sub Workouts_Click()

Dim stfilter As String
Dim stFormName As String
Dim getdateid As Integer


stFormName = "Datelog"
getdateid = Me!Workouts.Value

stfilter = "[athleteid]=" & Me![Athleteid]

DoCmd.Close, acform, Me!Workouts

DoCmd.OpenForm stFormName, , , stfilter

DoCmd.FindRecord getdateid,,,,,acAll









End Sub

 

[Pieter Wijnen]

Dim RsC As DAO.Recordset
Dim getdateid As Long ' if it's a date use: Dim getdateid As Date
'.. your code

DoCmd.OpenForm stFormName, , , stfilter
Set RsC = Forms(stFormName).RecordsetClone
RsC.FindFirst "DateID = " & getdateid
'RsC.FindFirst "DateField = #" & Format(getdateid,"yyyy-mm-dd") & "#"
If Not RsC.NoMatch Then
Me.Bookmark = RsC.BookMark
End If
Set RsC = Nothing


HtH

Pieter