Searching for Fields of Subform

[pritesharyan]

Suppose i have Mainform and Subform as show in thisimage.
Now i trying to serching for SubformID=6 when i am on
MainformID=2 and if i found SubformID=6 then i wish to goto that perticular MainformID (e.g.MainformID=1).


Using find and replace it couldn't be done.
please suggest me proper way

i have also read this thread but can't getting it.
i am looking for something nice solution for this.
Download Sample Project

[Bob Fitz]

Can you post a copy of your db

[keviny04]

pritesharyan, you need to add a command button on the main form with the following code:

Private Sub cmdFindSubformID_Click()
    Dim s As Variant, m As Variant
    
    ' Prompt for SubformID to find
    s = InputBox("Find SubformID:")
    
    ' Show error if entry is not numeric
    If Not IsNumeric(s) Then
        MsgBox "Invalid entry."
            
    Else
        
        ' Get MainformID
        m = DLookup("[MainformID]", "Subform", "[SubformID]=" & s)
        
        ' m = null: nothing found, tell user
        If IsNull(m) Then
            MsgBox "No MainformID found."
        
        Else
            ' m not null: MainformID found, move to record on main form
            Me.Recordset.FindFirst "[MainformID]=" & m
        End If
        
    End If
    
End Sub

This code prompts the user to enter a SubformID, tests for valid entry, finds the corresponding MainformID (with the Dlookup() function), and moves to the main form's record for MainformID. I attached the modified sample database here: Search Subform.zip

[pritesharyan]

thank you so much @keviny04 this is what exactly i am looking for thank you so much

[pritesharyan]

i have provided see updated question btw now question is solved thanks for answering.