VBA Combobox With 2 Cells
Mar 17, 2013
I'd like to fill a dropdown combo box with a list that is made up of 2 cells.
example, on sheet ASP we have the title in A1 and the surname in B1, next person in A2 and B2 etc..
Now I have a useform that needs to be filled with a combination of the title and Surname. I can get either or right, but just can not seem to get both combined and listed.
The code I'm using is:
Private Sub UserForm_Initialize()
'Variable declaration
Dim repeat As Integer
'fill ComboBox
For repeat = 1 To Sheets("ASP").Range("B65536").End(xlUp).Row
ComboBox1.AddItem Sheets("ASP").Cells(Wiederholungen, 2)
Next
End Sub
View 2 Replies
ADVERTISEMENT
Apr 21, 2008
I have a spreadsheet dealing with orders made by customers and the delivery of the items they have ordered.
When I have delivered the items to a customer I need to note down that their order has been delivered. I also need to enter the date on which it has been delivered.
I have created a user form in which I select the order number of that particular order from a combobox and state whether or not it has been delivered, this is either a "yes" or "no" selected from another combobox.
I then have to note the date in a text box on which the items were delivered.
My problem is getting the answer "yes" or "no" and the date to fill in on the worksheet next to the corresponding order number.
View 3 Replies
View Related
Jul 11, 2013
Im trying to cross match two cells from two combobox's,
Allong the top there are test names, and down the side is staff names,
On a user form there are two combobox's one with staff names the other test names
Untitled.jpg
How can i make it increase the number in a cell where the name and test match the combobox's value
I have Attached an example file,
View 2 Replies
View Related
Jul 16, 2014
I have combobox filled with range of two columns , i want somehow to show them both in linked cell , I don't figure it out , by myself using BoundColumn option and it showing first or second column only.
View 4 Replies
View Related
Nov 12, 2008
I want to do is a simple list, 2 items, call them "Thing_1" and "Thing_2". I have an equation in a column of cells. The equation is a simple If statement. If the user selects "Thing_1" then the first equation will run, and if "Thing_2" is selected then the second equation will be used. That's it. No more complex than that.
My original questions about how to initialize a ComboBox are cross-posted here: http://www.excelforum.com/excel-prog...ml#post1996135
View 4 Replies
View Related
Aug 5, 2014
I am looking for a way to have 1 combo box, but be able to click on any cell in a range and yield an individual results. In this particular case I am tracking maintenance, and what my crew's corrective actions were for each location. As this varies day by day I cannot use HLookup or VLookup. Also, the lists vary, and have over 100 options.
What I would like is to be able to click in the cell, and instead of scrolling through a list of 109 options be able to start typing the action and it to auto populate. This gets tedious when there are often 50+ locations with maintenance calls per night.
Furthermore, keeping the results exact for VLookup that is being used on another sheet.
I've attached a blank sheet. Columns B, E, F, & H each would ideally have their own combo box. I could click on any cell in the column and when I begin typing the option it would autofill to the correct list item.
Their respective List are currently to the right under columns J, L, N, & P with their headers matching the exact name they've been given.
View 2 Replies
View Related
Jun 10, 2008
I have successfully used the course booking form as a base for an input form in an accounting workbook that has several pages. (Thanks to Roy and others for the info; the course booking form on [url]is the best explained piece I have found on the net)
What I would like to do is use a range of cells to populate the combobox so that a user can make a choice from the account descriptions (from a sheet named Intro, b63:99) and have the form return the account number (Intro, a63:a99) to the relevant cell elsewhere in the workbook. The user would then have meaningful descriptions rather than numbers to choose from.
My coding for the form thus far is as follows.
View 10 Replies
View Related
Mar 29, 2009
Attached herewith a Excel file. How to Retrieve data from the Corresponding Worksheet Row using Combobox criteria
View 5 Replies
View Related
Mar 22, 2012
I'm using two comboboxes to simplify data query of a database: the first narrows the query by displaying employee names, the second narrowing the selection further by displaying the equipment that employee owns. I am able to populate both comboboxes fine.
The first combo box for employee names:
Code:
Private Sub UserForm_Initialize()
Dim ws As Worksheet
Set ws = Worksheets("User&EquipOverview")
[Code]....
Where I am running into trouble is that I want the selection made with the equipment name combobox (ComboDevice) to populate several textboxes with values related to that specific selection in the database. That is, the combobox population needs to have the cell location included as information to pull the correct information.
Each employee has several pieces of similarly named equipment, so it's not so easy as to search the initial list for the value of the combobox selection.
View 1 Replies
View Related
Dec 19, 2006
How can I get a combobox to list the values in a range of cells eg.
A1:A5 = 1,2,3,4,5 etc
I've tried...
ComboBox1.List = Range("A1:A5")
But that dont work (it was more of a guess)
View 9 Replies
View Related
Nov 21, 2006
How I can refer to sheet...Without activating sheet. i have this
Private Sub carga_click()
Sheets("Codigos de Area").Select
Sheets("Codigos de Area"). Cells(1, 2).Select
While ActiveCell <> ""
ActiveCell.Offset(1, 0).Select
ComboBox1.AddItem ActiveCell
Wend
End Sub
View 2 Replies
View Related
Jun 25, 2008
I'm looking to populate a combobox with a range that does not include hidden cells from autofilter. I will be sharing the workbook, so I cannot use Advancefilter either. Here is what I've got so far:
Set VRowSource = Sheet1.Range("A1", Sheet1.Range("A65536").End(xlUp)).SpecialCells(xlCellTypeVisible)
strRowSource = VRowSource.Address
With UserForm.Combobox1
For Each cell In Sheet1.Range(strRowSource)
Thisrow = cell.Row
If Not cell.Rows.Hidden And Thisrow <> Lastrow Then
.AddItem cell.value
End If
Lastrow = Thisrow
Next cell
End With
I think it hangs on Next cell.
View 5 Replies
View Related
Jul 14, 2014
What I'd like to do is fill specific cells with specific information drawn from other pages based on a combo box selection.
For example, if I were to pick 10131 in the combo box, I'd like it to fill out cells X, Y and Z with information from the three cells to the right of 10131. Assume X, Y and Z are not touching.
View 1 Replies
View Related
Mar 4, 2014
I have a combobox "cboRCAname" that is populated with a list of names from a dynamic range "RCA_Name" in a worksheet.
If a user selects an item in the combobox from RCA_Name, I want to display the a code that corresponds to that name. The codes are stored in a coulmn adjacent to "RCA_Name"
'Populate the combo box with the dynamic RCA list
Dim rngRCA As Range
Dim ws As Worksheet
Set ws = Worksheets("RCA_Data")
[Code] .....
View 1 Replies
View Related
Oct 1, 2003
it is possible to hide empty cells when using a ComboBox in a UserForm?
I have named the range from where I select my data and used the RowSource (ComboBox Properties window) to determine the selection. This works perfectly but I have many lines that are empty and I would like to know if they can be hide, or not selected, in the combobox.
View 4 Replies
View Related
Jan 29, 2013
I need to have a single combobox pull values from a very large term list (>40,000), and place selections in a single column in sequential cells (eg, B1, B2, B3, etc..). With the following code (credit to Ingolf and MickG) I am able to get the list to popluate cells in a column. However, I cannot seem to find the proper attributes to control the auto selection of items in list. I do want the autocomplete feature so the user can quickly navigate this huge list, but as soon as i start typing, it starts populating terms into the growing list. I would like to have the user actually select the item.
Private Sub Worksheet_Activate()
Dim Rng As Range
With Sheets("Listing")
[Code].....
View 1 Replies
View Related
Nov 2, 2013
I have a combobox on a spreadsheet it is populated on a sheet called teams :
The Format control has an input range of: Teams!$B:$B
Now this has a few thousand empty cells in the range but I would need it to only populate with the cells that are not empty.
View 3 Replies
View Related
Jan 1, 2007
I have a userform with text boxes and a combobox referencing a named range in the spreadsheet. What I'm trying to accomplish is when I click on a name in the combobox, I would like the text I'm adding to this name to be on the same row. Currently a new row is created with all this information instead of being added to the existing row and I end up with duplicate names in the combobox.
View 6 Replies
View Related
Apr 1, 2008
Well, after reading "Best Practices", it looks like I've got lots to learn about Excel and VBA Hope I don't break too many rules. see code below. I have a form that uses a set of dynamically filled combo boxes. The difficulty I'm having is in filling the combo boxes with correct data when updating an existing record. As per the code below, the Activecell. offset(0, #) references in the "if" statement in the For..Next loop process correctly, but Activecell references that fill the combo boxes seem to behave like an absolute references to Row 1, which are the Column Names. I've tried creating an Activecell.offset(0, 0) before every fill combo box statement and then using Activecell.offset(i, #) to reference the relevant cells, but to no avail. Obviously, I'm missing something here...
Private Sub cboUserName_change()
Dim usrnam As String
Dim found As Boolean
Dim i As Integer
Dim intRowCount As Integer
usrnam = cboUserName.Value
found = False
If usrnam <> "" Then
ActiveWorkbook.Sheets("Data").Activate
Range("A1").Select
intRowCount = Range("A1"). CurrentRegion.Rows.Count - 1 ................
View 2 Replies
View Related
Feb 24, 2010
Is it possible to use the Combobox ListFillRange to list values from two groups of cells? For example, in column 'A', I have the values, 1,2,3; and in Column 'B', I have the values, A, B, C. I want to list the values in column 'A' along with the value of say, B, in Column 'B'.
combobox.listfillrange = "Sheet1!A1:A3" < ---- how to include value B from column B in this list? Or, how to get value A from column B?
View 8 Replies
View Related
Oct 16, 2007
I am trying to find a way to create a macro that will take the data selected from the combo box and concatenate it with the data found in cells.
For Example:
Combo Box Selection - "Test"
ID (Column A) - Before
12345
98765
99999
55555
empty cell
23232
ID (Column A) - After
12345 Test
98765 Test
99999 Test
55555 Test
empty cell
23232
View 9 Replies
View Related
Jan 22, 2008
I need to populate a worksheet's rows with values from 2 comboboxes and a listbox which can have multiply selected items. After finding the row's last free cell, I have the listbox values properly populating correct column. However, I not sure how to get the corresponding combobox values assigned to the appropriate columns.
View 2 Replies
View Related
Mar 30, 2009
Am trying to get dynamic population of 2nd combobox based on match from criteria in combobox 1.
if column a = bears and column b = colours of bears then
when I select bears in combobox one, combobox 2 would populate with colors of bear.
I am think of having a combobox 1 change event that evaluates each row in a specific range (does it match the criteria?) if so, then add 2nd cell (column b) of that row to the combobox 2.
I know it would probably involve match and offset, add item and loop, but I am not sure what the syntax is.
View 9 Replies
View Related
Mar 30, 2014
I need to populate two combo boxes from excel sheet, the data will be like below:
Column A Column B
A 1
A 2
A 3
A 4
A 5
B 100
B 101
B 102
So from the above data, one combo box should hold unique values A & B.
On selecting a value from the 1st combo box A or B, respective values should be populated in 2nd combo box.
So the data should be like below:
If A is selected in the 1st combo box, then 2nd combo box should only show the values 1,2,3,4 & 5.
If B is selected in the 1st combo box, then 2nd combo box should only show the values 100,101 & 102.
Friends I need it in a macro and one important point is, this is dynamic and it is not static and the data can be more.
View 1 Replies
View Related
Dec 8, 2009
When I make a comboBox selection from the dropdown menu, the menu stays down until the last statement of the comboBox code is finished. How do I make the dropdown disappear immediately after the selection is made?
View 9 Replies
View Related
Nov 25, 2013
Rather than having to give it a range, I'd like to have a generic range giving me room to add or subtract values in the column without changing this statement.
Code:
Worksheets("Sheet1").Shapes("Combobox2").ControlFormat.ListFillRange = _
"O2:O14"
View 3 Replies
View Related
Jun 20, 2009
try and achive is when a user selects a item from the 1st Combobox the 2nd Combobox is the populated with the cell that is to the right of the selected item.
for Example if a user selects AAB from combobox1,, Combobox2 should populate with Belly.
Maby using combobox1_Exit for the excercise.
View 14 Replies
View Related
Sep 28, 2013
I created a UserForm then linked ComboBox1 to range A2:A, TextBox2 to range E2:E, and ComboBox3 to range M2:M of the same worksheet, named Sheet3. The row contents in Column A, Column E, and Column M are associated. Therefore, when the UserForm is active I want to be able to select a row from Column A in ComboBox1 and have the UserForm pull the contents from the same row of Column E into TextBox2, and Column M into ComboBox3. Here is what I have so far, but its not quite doing it.
Code:
Private Sub UserForm_Initialize()
Sheets("Sheet3").Activate
Dim ColARange As Range
[Code].....
View 2 Replies
View Related
Jun 12, 2006
I have a table, headers "FirstName" and "SurName".
Further a Userform with 2 Comboboxes "FirstName" and "SurName"
I'd like to choose the FirstName (say Jack) in the "FirstName" combobox, and based on that get the choice of the Surnames of all my Jacks in the "SurName" combobox.
Actually my sheet has much more fields and comboboxes, but i think my problem is just that I do not find a way to populate them dynamically.
View 9 Replies
View Related
Feb 8, 2008
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 Related
