Searching records from one form with the results showing on another form

[Aeonem]

Hello,

I currently have a single form set up (frmSearch) that has a search bar text box and command button (with VBA code) that enables me to search records in a table.
I was wondering If it would be possible to use a different form (frmSearchBar) as the search bar and then the record information appearing in the form already made.
Therefore I want the search bar form (frmSearchBar) to pop out from the (frmSearch). Once the search bar form is open, there will only be a text box and command button that will search for a record, and once the record is found, the information populates text boxes in the other form (frmSearch). While also closing the search bar form (frmSearchBar).
The current VBA code I use at the moment is:

Private Sub cmdSearchBar_Click()
If IsNull(txtSearchBar) = False Then
Me.Recordset.FindFirst "[Item]='" & txtSearchBar & "'"
Me!txtSearchBar = Null
If Me.Recordset.NoMatch Then
MsgBox "No Item found", vbOKOnly + vbInformation, "Sorry"
Me!txtSearchBar = Null


End If
End If
End Sub

txtSearchBar = the search bar text box.
cmdSearchBar = the command button.

I know that was a bit of a rubbish explanation but hopefully it got my problem across.

Thanks,
Aeonem

[rpeare]

I do not understand the explanation.
You currently have a search button/search field that work as you want but you want to change it so that when you click your search button a second form pops up with a prompt for the search criteria?

When you click the button on that new pop up form you want to then go to the appropriate record on the main form?

If that's the case you would have to substitute the form name wherever you have ME in your current code assuming you were running it from your new form (frmSearchBar)

I've never used the recordset.findfirst but it might be something like

forms("frmSearch").recordset.findfirst "[Item] = '" & forms("frmSearchBar").controls("txtSearchBar").val ue

if you're running the code from frmsearch bar you might be able to get away with

forms("frmSearch").recordset.findfirst "[Item] = '" & txtSearchBar