Searchbox to find record by IssueID

[kchm2000]

Hi,

Could someone help me or direct me how i can create a searchbox so that i can find records based on the unique reference number IssueID for the following database https://www.dropbox.com/s/82r23mqc4s...017.accdb?dl=0. Many thanks ahead.

[ranman256]

The button opens the query:
docmd.openquery "qsMyQuery"

the query uses the text box in the criteria:
select * from table where [field]=forms!myForm!txtFind

[davegri]

Country Form v03042017 davegri.zip

See attached. I changed the textbox to a combobox and got rid of the update button.

[kchm2000]

Hi thanks for the inputs but could you explain how you did that, please explain step by step like what buttons to press and where to make the inputs? What properties in the property sheet did you add to the combobox to make it the way it is? And if I want to change it to select a list of IssueIDs how do i change that?

Thanks a lot for your inputs its more or less what i was looking for, i am really new to access and am trying to learn.

[davegri]

Take a look at this video:
https://www.youtube.com/watch?v=vuiKb8jeKTMhttps://www.youtube.com/watch?v=vuiKb8jeKTM

Here's the code:

Option Compare Database
Option Explicit
Private Sub cboIssueSearch_AfterUpdate()
    Dim rs As Object
    Set rs = Me.Recordset.Clone
    rs.FindFirst "IssueID = " & Me!cboIssueSearch.Column(0)
    If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub
Private Sub cboIssueSearch_NotInList(NewData As String, Response As Integer)
    MsgBox "That IssueID, " & NewData & " does not exist", vbOKOnly + vbInformation, "  N O   S U C H   I S S U E   "
    Response = acDataErrContinue
End Sub

Here's the properties of the combobox

Attachment 28109Attachment 28110

[kchm2000]

Hi thanks for the quick reply, i am really new to MS access could you guide me as to how to add macros?

I notice that you were able to add your macro to a form


However when i tried to do it myself using a fresh database that also had a form i am not sure how to add a Microsoft access class object. Could someone assist me?

[kchm2000]

Hi guys nevermind, i found out how to update already. Just go to the property sheet and click event to update it. thanks