Search results

For another search function to search my main form...I used DCount() to add a message box....but boblarson helped me with that. I tried doing it to search in this subform...but either it doesnt work or I am doing it incorrectly.

No sorry...........

Sorry, with what you said, I have no clue how to move forward.

Yeah, I understand VBA....I can read it and understand it because I have some experience in other programming languages, but I can't really write it. I can write some basic things, but that is it.

Umm....that's the thing...I have no idea. You would have to show me what to do. I am very very new to VBA.

I want to add a message box when there is no records found. Here is my code: Private Sub btnSearchContacts_Click() Dim strSQL As Variant Dim l_strAnd As String If (Me.txtSearchClientID & "" = "") And (Me.txtSearchFirst & "" = "") And (Me.txtSearchLast & "" = "") And...

I have: Me.ClientInformation_Subform.SetFocus DoCmd.GoToRecord , , acGoTo, strSQL But it doesnt work. I tried, acLast and it works perfectly but this doesnt.

I want to create a new message box saying there are no results when no results are found using the search using DCount(). I need someone to show me how to do this. My code is: Private Sub btnSearchContacts_Click() Dim strSQL As Variant Dim l_strAnd As String If...

Open Add/Edit form. And if you use the search function click on the Contacts tab and type in Smith in Last Name. What I want is when the user types the last name and finds the last name, I want that record that matches that search word to be selected. When a record is selected it is...

Works perfectly THANKS motleyjew!

No that doesnt work. Because when you are in the Add/Edit form and go to another record so the Lead ID is different, the Lead ID in the SalesWon form does not change.

Actually I think I got it to work here. Thanks boblarson for your help.

Ok. I have no clue what the field name should be because I have those four fields that I am searching in....do I put all field names or what? I am searching in my 'Accounts' table.

I appologize. Sorry, its a Monday. Ha. Here is the new database with the right forms:

PROBLEM SOLVED. THANKS namliam FOR HELPING ME OUT!

If you open up my example database and open Add/Edit Records and you go down to Disposition and you select Won, Sales Won form pops up. As you can see, this form has a Lead ID field. I want this Lead ID field value to be the same as the Lead ID field value on the Add/Edit Records form. So for...

Just tried this and it doesnt work. I have no clue why it wouldnt work, but it doesnt. Just curious? What EVENT do you suggest I place this code?

This is my actual code: Private Sub btnSearchAccounts_Click() Dim strWhere As String ' The Criteria String Dim lngLen As Long ' Length of the criteria string to append to ' Adds LIKE Company field match to the string If Not IsNull(Me.txtSearchCompany) Then...

Yeah, but you definately need an IF statement. I want the label to CHANGE if it is a clinic or a hospital. And that is determined by a text field that says either, "IP" or "OP" (In Patient or Out Patient). I have created two labels called lblBeds and lblProvider If Me.txtIPOP.Value = "IP"...

Can't you just click on the column header and go to Records > Sort > Sort Descending? And then save the table?