There are a couple of oddities about what you're doing that may (or may not) be causing the problem.
First, I don't see a declaration of rstsubformclone. Is that declared at module or global level, or do you not have Option Explicit turned on? If you don't, you should, and you should have rstsubformclone declared:
Dim rstsubformclone As DAO.Recordset
Second, what data type is the field [placerordernumber]? If its a Number type, remove the single quotes in the .FindFirst criteria argument, and make it:
.FindFirst "[placerordernumber] = " & Forms!frmReviewOrders!txtPlacerOrderNumber
Third, and probably not the issue, but it's still not a good idea, you are using the Form_<formname> syntax to refer to the criteria form. For a number of reasons, this is really not a good idea; it is much more reliable to refer to the form
through the Forms collection. Since you're referring to it repeatedly, I would probably get the reference once, like this:
Dim frm As Access.Form
Set frm = Forms!Forms!frmReviewOrders
If Len((frm!txtPlacerOrderNumber & "") > 0 _
And frm.DeferredTab = 0 _
Then
With Me.RecordsetClone
.FindFirst "[placerordernumber] = '" & frm!txtPlacerOrderNumber & "'"
If Not .NoMatch Then
Me.Bookmark = .Bookmark
End If
End With
End If
Set frm = Nothing
Dirk Goldgar, MS Access MVP
Access tips: www.datagnostics.com/tips.html
