Modules & VBA :: CBO Change To Populate Listbox With Distinct Entries
Jul 21, 2015
I have a combo box that populates many listboxes based on a selection (listbox values are coming from another table [Master]) - simple enough. I want the listboxes to populate with DISTINCT entries - also seems simple enough (right?).
As you'll see below, if the user selects "All" from the combo box (cboSite), I want the listboxes to populate with distinct values from all sites; otherwise, any other selection is a unique site and the listboxes will populate with distinct values based on that unique site.
This works BEAUTIFULLY if I select a unique site, but when I select "All", there is always one (and only one) duplicate value in EACH listbox. That is to say: all values but one in the listbox are distinct.
FOR EXAMPLE:Select unique site (not "All") from "cboSite"
The listbox "lstMajEquip" (which only has values "Yes" and "No") populates to show "Yes" and "No"
Select "All" from "cboSite"
The listbox "lstMajEquip" (which only has values "Yes" and "No") populates to show "Yes","No", and "No" (what?!)
As mentioned, this happens for all 8 of the listboxes, not just "lstMajEquip"...
Using Access 2010
Code:
Private Sub cboSite_Change()
If Me.cboSite = "All" Then
Me.lstBusiness.RowSource = "SELECT DISTINCT Master.Business, Master.Site, Master.Exclude FROM Master WHERE (((Master.Exclude)=False) And ((Master.Business) IS NOT NULL) And ((Master.Business)<>''));"
[Code] ....
View Replies
ADVERTISEMENT
Nov 21, 2013
I am trying to write a code that will execute at the change even of the combobox/Listbox and when a character is typed in it then all the data from "DocumentType" field whose first character matches with the first character typed in Combo/Listbox will be stored in it.
The following code doesn't work:
Private Sub ComboBox4_Change()
Dim strText, strFind As String
strText = Me.ComboBox4.Text
If Len(Trim(strText)) > 0 Then
strFind = "BarcodeRef like '" & strText & "*'"
End If
[Code] .....
View 1 Replies
View Related
Jan 8, 2014
I want to fill my 2-column listbox on a form with the following VBA code:
Option Compare Database
Private Sub Form_Load()
Dim proefsel As Integer
Dim nproducts As Integer
[Code]...
When i run the code i get a compile error on the code in bolt. I am using access 2010.
View 3 Replies
View Related
Apr 7, 2014
I have some code that successfully gathers some items and adds these items to a listbox, one item at a time using .AddItem.And it works ok.The problem is, when there are a bunch of items to add, everytime the .AddItem runs, the form redraws.there are a bunch and this leads to a lot of flicking while the form redraws however many times .AddItem adds an item.
I've had the idea of building an array and then assigning the array to the listbox.I can build the arrray no problem but i have not been able to assign the array to the listbox all at once.how to do is add items to the listbox from the array one specific item ListArray(i) at a time.
Obviously this would work, but gains me nothing in terms of the visual effect in the form becuase it is still adding to the listbox one item at a time.Is there some way to assign an array to a list box all at once, without doing it one item at a time?
View 3 Replies
View Related
Jun 12, 2015
I have a list of staff that have a conflict of interest with a particular entity. As a result, these staff are not allowed to interview these entities.
I have a query that matches all staff with their respective entities that they have a conflict of interest with (CoI) and that is functioning correctly.
When the form loads to add an interview, there is a listbox that pulls all the people who are not allowed to do an interview with that particular entity. That is also working correctly.
I have a subform, that is a continuous form, which will allow the user to add staff, one at a time, via a drop down box. These people are stored in their own table with a FK Id to the interview table. This also works correctly.
How to filter the combobox on the subform to exclude the people in the listbox.
Here is what I have tried, loosely based on what I have found on Google and researching here. I am 100% sure it is not working correctly, but what I am missing.
The query the listbox is based on has 3 colums, the ID, the Name, and the business contract number.
Code:
Private Sub Form_Load()
Dim strSource As String
Dim i As Integer
For i = 0 To Me.lstCoI.ListCount - 1
[Code] ....
In the immediate window, I get the following result:
SELECT [staff] FROM lutStaff WHERE Staff <> name1
SELECT [staff] FROM lutStaff WHERE Staff <> name2
SELECT [staff] FROM lutStaff WHERE Staff <> name3
SELECT [staff] FROM lutStaff WHERE Staff <> name4
SELECT [staff] FROM lutStaff WHERE Staff <> name5
SELECT [staff] FROM lutStaff WHERE Staff <> name6
The issue is that the box is not filtering all the names out of the list it is built on. It is only filtering out the last name.
Obviously I need to save the results for comparison, but I am at a loss on how to do that.
View 10 Replies
View Related
Jul 27, 2015
In the past a Teacher would manually create a Form (Student Form) containing Student information, (Name, Gender, Birthdate, Homegroup) as well as additional issues on the student. This would all be saved into a table.
I would like to change this manual process of typing in individually to each text box, therefore, I have been able to run a report from a external program that obtains (Name, Gender, Birthdate, Homegroup). This saves as CSV and I am able to import into a separate table within the database.
This works no problem.
What I have set-up is a form that contains a listbox this contains the Student name and Homegroup from the imported table contents. Again this works fine.
What i would like to do is when a student is selected from the listbox and dbl clicked on, how can i make information (Name, Gender, Birthdate, Homegroup) populate the textboxes in the Student form that the teacher previously used? could this be an update query where the imported table information will then go into the Student form? If so, how can I tell the dbl click of highlighted name is the data i want to populate?
View 1 Replies
View Related
Apr 22, 2008
I have a text column that has some Letter in it, the format is #A-##A where A = Alpha, the last Alpha is also not required. What I want to do is get a list of all the first A's, so like i have 11P-23A, 22G-45B, 33K-67C and I want to get A,G,K is this possible?
View 3 Replies
View Related
Dec 26, 2014
I want to double click on one of listbox item and change it without opening any other form.
View 6 Replies
View Related
Nov 27, 2012
I have a table of data which includes a date field and also various other fields which may or may not be filled with data.I'm trying to populate a listbox with the months for which this data is missing (a separate macro will then loop through these months to fill the missing data) But I only want each distinct month to populate the listbox - not each individual date.
Code:
strSQL = "SELECT DISTINCT month([EntryDate]), year([EntryDate]) FROM [SampleTable] WHERE [ValueField] Is Null"
Me.lstSampleListBox.RowSource = strSQL
I want to return the month in <mmm yyyy> format.
View 2 Replies
View Related
Jul 1, 2013
I am currently trying to make a form which will generate a report for the users. Currently the form has 3 combo boxes where users select which fields they want displayed from the table in the report. They also have sorting options next to them (Asc or Desc). I am now trying to put in a multi select list box under each combo box to allow users to filter the report to their liking. Currently I am trying to pull distinct values from the specific field of the table and display them in the listbox for users to select.
I have tried using vba to set me.filter1.rowsource = SELECT DISTINCT me.combo1 FROM EVAP_Database, but this doesnt seem to work. I have also tried a few other codes and still no luck.
Table: EVAP Database
Combo: Combo1
Filter Listbox: Filter1
View 6 Replies
View Related
Jan 18, 2006
Better still, any way of inversely numbering them from top to bottom?
View 3 Replies
View Related
Feb 23, 2015
I would like to put a date in a form the region and then a staff code and based on the three entries then auto populate the remaining cells if those three have been entered together previously. Is this possible?
View 3 Replies
View Related
Aug 26, 2013
I have a form where a user can select from a listbox (pulled from a database) and "Add product" - it then goes into a Textbox, each taking a new line when "Add product" button pressed. Then when they press "Add Customer" those details along with other entered details gets stored in my Customer Database..
The textbox store multi-line entries in the "ProductName" field heading in database.
Is there anyway i can use a List instead of the textbox? Adding individual entries to one certain customer? I have an EDIT facility aswell so would be easier to have a "Remove Product" button instead of manually backspacing a whole product entry from another textbox (containing all products, on new lines).
View 4 Replies
View Related
Dec 13, 2005
I have a tblWorkoutLog which contains workout data (body focus, excercise, date, etc.).
I have a listbox (populated from a table) which allows a user to select a/several body focus (arms, legs, etc.). Once the selections are made, a query is created with the IN command to filter based on the selections.
I would like to add a second listbox that will populate with dates that are associated with the selections made in the first list box. For example, if "arms" and "legs" were selected, I want all the dates where "arms" or "legs" were worked on to populate the second listbox. After the user makes those selections, I would like create a final query with the output (i.e. all data associated with "arms" and "legs" on the selected dates).
The first listbox works great, but I don't know how to populate the second listbox and use that selected information.
I am learning code and SQL statements as I go so please be patient with me.
Thank you.
View 4 Replies
View Related
Aug 19, 2005
I want to pass a search parameter from a form to a query then use the query results to populate a multi-column list box. So far, I can pass the parameter to the query and generate results, however, I want the query results sent to a listbox rather than create a new window.
I set up the listbox to receive results from the query, but when the form opens the listbox is already populated with arbitrary query results. I want the listbox to be empty when the form is opened, I submit a parameter to a query, and the listbox fills with the results
Additionally, once the listbox is populated, I want to clear the listbox but am having the error: The RowSourceType property must be set to 'Value List' to use this method.
View 2 Replies
View Related
Sep 13, 2004
Hi All,
I want to change existing entries in a table to upper case format. I know that it is possible with a query (update I suppose) using an expression with the "UPPER" function. But I am not quite sure how to implement it in Access. A little help would be welcome...
View 2 Replies
View Related
May 29, 2005
I have a list box that is populated based on a table. now I have three labes that are also added to the form. What I will like to do is....
ListBox (3 colums)
On Double Click (listbox)
Set Label1 to the First Column.text in the list box
Set Label2 to the Second Column.text in the list box
Set Label3 to the Third Column.text in the list box
What i'm looking for is a way to update my labes based on the selection I make in the list box.
kind of like a confirmation.
On Double click it will show on label and it will act as a confirmation.
This customer(record) has been selected!
If there is another way to kind of show this same functionality please tell. I'm kind of new at Access but a master in Excel so I'm not affraid of VBA.
Thank you in advance.
View 2 Replies
View Related
Sep 15, 2006
Hi, Wish if some one could help me ASAP.
I have a table which contains name, tel, email
i need to import only records which have distinct email.
I do need need to import data of all three fields but only which has distinct email.
As there are number of record which are duplicate.
They have different names but same email.
So i need to condition only for distinct email but dump the data in a new table with all three records.
so same names can have different email.
but same email can't have duplicate email.
So need only records which have distinct email.
Please help .......
View 1 Replies
View Related
Sep 19, 2013
In my tables I have a field called first serial. This is the first element of a serial number range associated with each record. Very rarely I have to ask the user to specify a certain serial number in that range. (The serial numbers can be generated easily from the first serial) This happens during the run of a macro, so I have to use a Fom opened with WindowMode:=acDialog. The problem is that I have to populate a listbox with the generated serial numbers on that form. But I can't interact with a dialog form, since it stopos the running of the macro. I have tried to open it hidden, and change the modal property to true once the listbox have been populated, but this dosen't stop the macro to wait for user input.Is it possibble to pass the first serial value to the form, and populate the listbox in one of the Form's opening events?
View 3 Replies
View Related
Jul 15, 2013
I'm using a sub form to display data form a table. The users wanted it display like a spread sheet. In order to get all the data to display on the same page I am trying to break some of the longer feilds out (i.e. comment field) and display them in a list/text box and not in the table with the smaller fields.
Basically what will happen is when a record is selected in the sub form the comment field tied to each record will be displayed below. I've tried a few things but I keep getting errors displayed in my list/text box (#Name?)
View 14 Replies
View Related
Oct 5, 2012
I have a listbox that is populated with data from a table. I would like to use one of the columns data as the where clause of a sql string that will populate another form, how do I get the selected items column data that I need into a variable? This is in Access 2010 vba.
View 9 Replies
View Related
Aug 28, 2013
I am trying to populate a textbox from a field in a table based on clicking on a item in a listbox. User clicks a name from the Client table in the client field, and the date that is stored in the orderDate in the same row. I want the text11 textbox to show that date.
View 9 Replies
View Related
Dec 16, 2014
I have a query that contains Invoices(usually 2 line items per invoice) Taxable and NonTaxable. I need to able to basically export it to excel on multiple worksheets when the Amount of unique invoice number reaches 15.
From all my scouring on the internet I can't find anything with this criteria.
View 2 Replies
View Related
Oct 10, 2005
I have data which consists of:
xxxxx123 A.Nother 123456
xxxxx123 B.Jones 123457
xxxxx456 D.Smith 123458
xxxxx456 Z.Zephir 123489
How would I ensure that the query returned only unique rows (where column 1 is unique) based on the first alphabetical record of column 2?
Any ideas?
View 1 Replies
View Related
May 27, 2005
Good afternoon
I have been helped out so many times in the past here I thought I would try my luck again.
Is it possible with the use of option buttons to change the row source of a listbox?
I want to use the listbox for a search criteria and thought it might be easier to have 1 listbox been updated from the choices made using a group of buttons.
I would like like the row source to be based on different tables maybe I might need to use queries.
Can anyone point me in the right direction?
View 6 Replies
View Related
Apr 30, 2014
I have a form with a listbox in it. I want the listbox to update as the record changes.Let me get a little more in-depth...The form will be used to identify merchandise that exists in the company to fulfill current POs.
What I want is for the listbox (which displays Store Locations) to update when the PO# updates on the form (so as the record changes).Currently, the listbox only pulls all the store locations no matter if you hit next record to get a new PO.The two main fields I am working with are PO# (text box) and Store Locations (the listbox).How can I get the listbox to update as the record changes on the form?
View 1 Replies
View Related
