I have five comboboxes in userform1, they are link to Column A, Column B, COlumn E, Column G and Column Z of "Reference" worksheets respectively. The values in each column could contain duplicate values. However, I'd like to only display the unique values in those combo boxes and I have no clue how to achieve this.
View 7 RepliesI am trying to display multiple columns in my combobox on my userform.
I have it where it will find and load the data but when i select from the data only 1 column shows is there a way to have all 4 columns show up?
Dim lrowzz As Integer
lrowzz = (Sheets("graphs").Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).Row) - 1 'new row to enter data into NEXT AVAIABLE ROW
Me.capac.List = Sheets("graphs").Range("B43:e" & lrowzz).Value 'populates the capa combo box on change capa tab
that is my code to populate the combobox using a dynamic range from B43 - D & Lastrow with data
Column b Column C Column D Column E
333 infoa dateA LocationA
334 infob dateb locationb
335 infoc datec locationc
when it loads the combo box i can see:
333 infoa datea locationa
But when I select 1 of the lines all that is displayed is Column B Data. How do i get it to still show all of it?
I found this thread which deal with populating unique values in my listbox.
Here is the thread link. [URL] ........
What these line of code mean (the ones in red).
Code:
Private Sub UserForm_Initialize()
Dim v, e
With Sheets("maintenance").Range("c2:c500")
v = .Value
End With
With CreateObject("scripting.dictionary")
[Code] ......
Note : I simple tried to check the value of v by giving msgbox (v), just below the line v = .Value.
But I got run-time error 13 : Type mismatch error.
I have 2 columns of data on Sheet2. The first is Product in column B. The second is Benefit in column C.
I need to look at product column B on Sheet2 and add unique items to my first Combobox after the command Userform1.show.
The person using the form will select a product from Combobox1 and then Combobox2 should add the corresponding Benefits from the benefits column on Sheet2.
As a side note: I expect products and benefits will continue to be added to columns B and C in the future so I can't have a "hard-coded" set of rows if that makes sense.
I've pasted a small 2 product example of Sheet2 below.
ProductBenefit
Account DefenderLoss of Life
Account DefenderDisability
Account DefenderInvoluntary Unemployment
Account DefenderLeave of Absence
Account SecurityLoss of Life
Account SecurityDisability
Account SecurityInvoluntary Unemployment
Account SecurityLeave of Absence
Account SecurityHospitalization
Account SecurityNursing Home
I am trying to create a form with a combobox drop down menu. The list I need displayed is in cells C4:C20 but I only want to show unique values not all of them.
View 9 Replies View RelatedPopulate Adv Filter Criteria from Inputbox with valid data
I've set up a macro to extract 3 different sets of data using Advanced Filter (same data range, different criteria & extract ranges)
There are multiple options (different individual dates) to satisfy the criteria (a date) for each of the 3 extracts and I want the user to select the criteria (a specific date) from the range of unique values in the data range upon which the Advanced Filter criteria is going to be applied. (A bit like the effect provided by Autofilter)
My initial attempt was to capture the criteria date from the user and populate a cell, and then have a vlookup function in another cell check if that crieteria value exists in the specified range. I then ran a loop in the VBA code until the value is valid (ie. exists in the range). However, to streamline this I was hoping to allow the user to see a list of the valid (available) dates when they respond to my Inputbox request for the criteria.
i have a list of surnames in column A in a spreadsheet i want to use this for the source of the combo box also i want this list to be unique and if the surname is not present i want to be able to put the name in the combo box and add it to the sheet
View 2 Replies View RelatedI have 2 combobox in userform. Both the comboboxes have the same list down value and I have applied as follows
VB:
combobox1.value = "Transport"
combobox1.value = "Paper"
combobox1.value = "Pencil"
Like this I have long list
In the combobox2 same list has been applied
Is there a way in which by one command the list is applicable to both the comboboxes, that would save me on the length of VBA.
I have 10 comboboxes - all require exactly the same list. Rather than having to copy the list 10 times in the coding - and changing the combobox name from listcode1, listcode2 etc, is there a loop code which I can add to do this for me??
Private Sub Userform_Initialize()
'Empty txtdate
txtdate.Value = ""[code].....
i want to use a listbox or combobox on a userform with the values coming from column A in the MAIN sheet. what i need is if the colour i want is not there i type the new colour in it then adds the value to the end of values in coloumn A and too the list for the next time i use the userform. is it possible to do this and how?
View 3 Replies View RelatedI am not sure if this can be done easily but essentially what I have is a userform that fills out a form that will used by several different people and saved to a central location.
There is a blank combobox currently labeled "Supplier:" that each person fills out each time on the userform (there are no dropdowns yet).
What I am wanting to do is for every person who saves (I have coded the save button) with the "Supplier:" combobox filled out to save what they entered and input that into the combobox dropdown so when the next person uses the userform the entry the previous person entered would be in the combobox as an option to select.
Essentially, a combobox populates itself based on what previous users have entered into it.
Excel 2007 and very new to VBA...
I have a userform (named "QAReviewForm") with a combobox (named "cboSupName"). I want it to populate with my named range "SupList".
FYI, the SupList is found on sheet 2, "Administrative Menu" in column E. E1 contains the heading "Supervisors", and my named range formula is
Formula:
[Code ] .....
When it runs, my form opens and the combobox is there, but nothing appears as options for me to select (yes, I have some values in column E).
I have a list of employees that can be assigned to tasks, the list is large enough that I cannot remember who is assigned to what.
All the employees assigned major tasks are automatically filtered out but these are employees with administrative tasks that should only be assigned as a last resort. I would like to assign the employees with administrative tasks a gray, italic, strike-out or some other font to indicate that they are different.
I assume this is done during the Add Item process...
I have designed a multiple list box on my userform and display it on one of the cells in the spreadsheet but with each list item separated by a comma when its display on excel.
The problem with my code is the delimiter appears at the first list item, but it should only appear if more than one list item is chosen.
|Apple|Orange
I was thinking if there is something like if gItem = 0 then only display sFruits Else display what I have below???
VB:
For gItem = 0 To FruitsList.ListCount - 1
If FruitsList.Selected(gItem) = True Then
sFruits = sFruits & delimiter4 & FruitsList.List(gItem)
End If
Next
.Cells(gRow, "AO").Value = sFruits
I have one userform that loads combobox values upon userform Initialize. Though through a second userform changes can be made to anotherworkbook this workbook is saves any changes. when i close the second userform i need to rerun the 1st userform Initialize event to update the combobox's incase changes have been made.
View 5 Replies View RelatedI have a userform with a combobox that has three items to choose from: Blue, Red, and Yellow. When a user selects one of those options, I would like another combobox to appear on my userform with a specific list for that option.
View 2 Replies View RelatedI'm trying to make a userform that has 2 combo boxes. I have just 3 columns right now.
Procedure GrpADA-QSI DescProcedure GrpAnesthesia And
Drugs9210-LOCAL ANESTH/NO SURGAnesthesia And DrugsAnesthesia And
Drugs9212-TRIGEM BLOCK ANESTHCrowns And BridgeAnesthesia And
Drugs9215-LOCAL ANESTHESIADenturesAnesthesia And
[Code] ........
I copied and pasted Column A into Column C and then removed duplicates. I named Column C 'ValList' and placed it in the RowSource for ComboBox1. What I now want is for ComboBox2 to populate based on my selection in ComboBox1. There are no duplicates in Column B. Duplicates are in Column A.
I also named Column A 'Proc_Grp' and Column B 'ADA_QSI_Desc'
For the properties in Combobox2, I left the RowSource empty. (that's correct right?) Because there's going to be a code that links Combobox2 to Combobox1... I think...
How can i Loop through a combobox's values and compare to a string value and then set the listindex of the combobox to that value?
View 5 Replies View RelatedI have a column that is updated several times a day, I need to be able to view that list in a userform combo box and that box to be able to react like an autofilter list. I've tried the advanced filter thing but as th elist is contantly updated it makes this very hard to handle as I have to set macros to compile the list and then delete it once it's been used. Is there a way I can set vba code so the ComboBox populates unique fields, sorted AZ and removed the blanks without using the advanced filter..?
View 7 Replies View RelatedEach product is represented by a serial number (column A).
The can be sorted on column A from smallest to largest prior to calculating results if that helps.
The repair list contains 1 entry per spare part used, so the same serial number may occur several times.
Furthermore, a product may have been repaired on several instances - so the serial numbers can span several dates (column B).
The solution i am looking for should return the number of unique repair dates per serial number. That way i can see, how many times each product has been repaired. Results can be displayed in an individual column.
Sample list:
Serial........Repair date
207742052008-09-04
207755082008-12-17
207755212008-12-31
207755212009-01-22
207755212009-01-22
207755212009-01-22
207755212009-02-13
207755212009-07-24
207755362009-05-20................................
I have a data table that repeats as follows:
CITI
SCB
SCB
SCB
SCB
SCB
SCB
SCB
RBC
RBC
RBC
RBC
From the data above I need to make a new unqie list that would grab all unique entries.
CITI
SCB
RBC
I am trying to use the following guide:
http://blogs.techrepublic.com.com/howdoi/?p=111
Get stuck on "Listing A:
I have a combobox on a Userform, when the userform initializes i want it to populate Combobox1 with all the Unique values from SHeet 1 Column A (variable length to the column)
I dont know how to select a unique record only.
*thinking a bit further ahead i have a second combobox that i need to populate with unique values from column B on sheet 1, where in column A matches what was selected in combobox 1
I have a database of data that looks like this
Centre Name Training Type Expert 1 Expert 2 Expert 3 Expert 4
MyCentre MyTraining Me
MyCentre MyTraining Me
MyCentre MyTraining Me
MyCentre OtherTraining Me
NewCentre NewTraining NewPerson
I am trying to create a user form (in VBA) with a combo box that has each centre name appear only once (despite the fact that in the database each occurs multiple times). When a specific centre is selected, this brings up all the different training types associated with that centre in a separate list box. When that training type is selected, it should bring up all of the experts in that training type (for the specific centre). I should mention that the range is static (though the data is always contiguous) as the database is updated on a going forward basis.
I have a range from a column in my Excel table that is formatted ##-##/##. A number like 1.125 would look like 1-1/8.
I also have some values that are text, such as: #6 (I'm working with threads). I use # because it is not the same thing as 6, which could be 6 millimeters or 6 inches.
In combo box on my userform it just shows the decimal values of the range. How can I format the combobox to match Excel?
I have set up a UserForm containing a ComboBox, listing all suppliers. Upon invocation, the form becomes visible and the user enters a letter on the CB window, to which the CB displays the first entry starting with the user's input.
What I'd like to do is to have the CB expand its window, so that upon entering a letter the window shows something like, say, 5 entries, of which the top one is the first occurrence starting with that letter. Normally, clicking on the down arrow would do that, but I wonder if I can save them the keystroke.
I've got a form with a ComboBox the RowSource of which is embeded in the column A of a certain sheet in the workbook - the values stored in that column resemble time reference, like: 00:00 (stands for 12:00 AM) or 01:45 (stands for 01:45 AM). The problem now is that when I choose something from the list the value that is displayed is different form the one present on the list, like choosing 01:45 we get the number 7,29166666666667E-02. Is there a way to cause the ComboBox to display the proper values present on the list the RowSource is linked to?
View 2 Replies View RelatedI need to create a drop-down (or a combo list) list based on a column in a separate worksheet (in the same workbook). The values in the column have many duplications, and I simply want the combo box to return a unique list.
After trying this using various options like drop-down boxes, combo boxes etc it does not seem to work. A drop-down box will return a complete list (including all of the duplicates). In addition the drop-down was linked to a cell and the value returned to the cell was a number based on the position in the list when what I actually wanted was the text. For example - my list in Worksheet 2:
PETS
Cat
Dog
Dog
Cat
Horse
Rabbit...
In Worksheet 1 if I choose 'Dog' from my Combo box (or drop-down) along with showing all of the duplicates it returns '3', instead of what I want 'Dog' and no duplicates.
I created a data entry form that contains a ComboBox. The ComboBox is based on a range that has three columns and many rows. The purpose is to have the user select an item from the first column, and the other two columns are automatically filled in on the table.
The form works and the data is transferred to the table as it should. The issue is that when you select the ComboBox, it displays the data from all three columns wrapped in two columns. Some of the data is repeated and it looks confusing. How do I have the drop down show only the data in the first column?
I am coding my first UserForm. I've gotten some of it working. I need to display a ComboBox that will display 3 different CSV files. Since these will be updated here and there, I didn't think AddItem would work. How i should script this?
View 2 Replies View RelatedI have some vba code that opens up notepad and populates it with data from Access 2010. Everything works great including the notepad function, the database, and how the data is stored and displayed in the table/form.
The problem: I want to display the service name not the ID in notepad
I passed the field that I want to include in notepad as a string. However, it returns the ID and not the name of the person.
I don't want to change anything in the form or field property because it works perfect as is.
Is there a way to pick which column to display in the Email by vba code?
Column 0 = the ID and Column 1 = the name
Code:
Me.fieldName.Column(1)
^^That doesn't work for me
Here's my code (it works)
Code:
Private Sub cmdNoteAccept_Click()
Dim strCode As String
strCode = strCode & Me.Servicer & ": "
strCode = strCode & Format(Me.DateCreated, "MM/DD/YYYY")
strCode = strCode & "Insert message here"
Shell "Notepad.exe", vbNormalFocus
SendKeys strCode, True
End Sub