Jump to a record (using .findrecord is slow for runtime users

[Turncloud]

I have a small database application with only around 375 records. There is a form with a list view that has a button which jumps to a detail view of the relevant record.

The code I use for this is;

Private Sub btn_detail_Click()
Dim temp_ref As String


temp_ref = Me.Reference.Value
DoCmd.OpenForm "Supp_main_detail"
'The next line opens the selected record
DoCmd.FindRecord temp_ref, acAnywhere, , acSearchAll, , acAll
End Sub

This seems to work fine, but users are complaining of a delay of 3-5 seconds on pressing the button. I've confirmed it's there, but only for those users running Access 2013 runtime. If you have the full version of Access it's instant. Data is split and is in the same place for both groups. Development is in Access 2016.

Any ideas - is the FindRecord command the fastest way to do it?

regards
Simon

[ranman256]

Don't use FIND, just filter the list to see all records,..

Private sub txtFind_afterupdate()
   If isnull(txtFind) then 
       Me.filterOn= false
   Else
       Me.filter ="[field]='" & txtFind & "'"
        Me.filterOn= true
   End if
end sub

[Turncloud]

Changed it to this, but it filters the list form not the detail form

Private Sub btn_detail_Click()
Dim temp_ref As String
temp_ref = Me.Reference.Value
DoCmd.OpenForm "Supp_main_detail"
'The next line opens the selected record
' DoCmd.FindRecord temp_ref, acAnywhere, , acSearchAll, , acAll
Me.Filter = "[reference]='" & temp_ref & "'"
Me.FilterOn = True

End Sub

[Turncloud]

Got it - this seems to work

Private Sub btn_detail_Click()
Dim temp_ref As String
temp_ref = Me.Reference.Value
'The next line opens the selected record
DoCmd.OpenForm "Supp_main_detail", , , "[Reference] = '" & temp_ref & "'"

End Sub

[Turncloud]

I spoke too soon - this creates a filter (which is fine) but when I remove the filter it jumps to the first record, which is not what I want. I want to remove the filter but stay on the current record.

[RuralGuy]

Maybe this link will help: http://www.baldyweb.com/Bookmark.htm