Hello,
I have a form that I need to search on last name to find the person I need edit. THe code I am using brings back the 3077 error code for missing syntax. Please review and let me know what is wrong with the code. Would also like to add a button to add new data, I know I can do that at the bottom but I still would like a button.
Code:
Private Sub Search_Click()
Dim bkmk As Variant
Dim strField As String Me.RecordsetClone.MoveFirst
Me.RecordsetClone.FindFirst "LAST NAME Like" _
& Chr(34) & Me.SearchText & "*" & Chr(34)
If Me.RecordsetClone.NoMatch Then
MsgBox "No Match"
Else
bkmk = Me.RecordsetClone.Bookmark
Me.Recordset.Bookmark = bkmk
End If
End Sub