Open Subform At Particular Record

Hi All

I have a subform called frmProducts and on it I have 2 command buttons One is to use the current open form to jump to a particular product to make it easier to edit the details and the other is to use the current form and jump to a new record.

Now I have this working when running the form on its own but when I try and run it as a subform it does not work. I am not sure how to adjust the coding to let this happen.

the Main forms name is "MainForm"

Below is my current coding to open the form at a particular record

Private Sub EditProduct_Click()
Dim Msg As String
Dim Title As String
Dim Defvalue As String
Dim Answer As String
Msg = "Enter a Product Name: "
Title = "Open Prouct Form"
Defvalue = ""
Answer = InputBox(Msg, Title, Defvalue)

If Answer <> "" Then
DoCmd.OpenForm "frmProducts", , , "[ProductName]='" & Answer & "' "
Else
DoCmd.OpenForm "frmProducts"
End If
End Sub

Below is my coding to open the form at a new record

Private Sub NewProduct_Click()
DoCmd.GoToRecord , , acNewRec
End Sub

Many thanks in advance for all assistance

Sirch76