I have a database and a user form. Lets assume the database hosts a list of all cities in North America in column C, with that city's state/prov. in column B, and in column A, that state/prov.'s country.
In the user form, the user will select from the available list in the first combobox either Canada or United States. Based on the selection from combobox1, combobox2's rowlist will contain only the states, or provinces, based on the filtered data. The database will be filtered based on column A, column B now shows only the states or provinces it the US or Canada is chosen respectively.
Based then on the selection in combobox2, the user selects from combobox3, only those cities found in that state or province ... information gathered from a filter of column A (country), column B (state).
Basically, with each combobox selection, the database is being filtered.
I've got a userform with a combobox and a textbox. The combobox is populated from a dynamic range of product numbers and when a existing number is selected from the list, a respective product name appears in the textbox. These are then saved to a database sheet via command button.
My problem is following:
When a new product number is entered in the combobox that isn't on the list, I want the number & name of the new product to be saved not only on the database sheet but also on the source sheet so that the new product would be included in the combobox list when run again. Here's my code so far:
Private Sub CommandButton1_Click()
'here is the code that saves everything to the database sheet
Normally the combo box will reading the data range from top to bottom. Is there any way to allow the combo box to reading the data from left to right? when i cover, it only reading the first cell of data range.
I have a UserForm with a ComboBox on it. The RowSource for this ComboBox is a named range called rInv. rInv has rows broken down by day and 105 columns broken down by items. The rows are broken bown to 31 day sections with 27 possible customer/Invoices per day. Most days have between 2 to 20 Customer/Invoices, which leaves anywhere from 7 to 25 blank entries per day. These blanks spaces won't allow the user to scroll past the 1st days Customers/Invoices!
Is there any code to remeve the empty spaces from being seen by the ComboBox RowSource? (I can't actually remove the spaces, they need to remain)
My Userform with combobox entries for product checks against the rowsource and if not on the list, is added to the list. the list is a named range in a Table that is used in a data model.
No matter which way I try I am regularly getting a corruption in the table that is home to the named range which is the rowsource... after one or two entries from the userform.
The rowsource is not bound to the worksheet, it is populated at userform_initialize procedure. (There are 4 combobox drawing from same rouwsource hence the loop through to check each)
debug points to the line at which conbobox value is being entered into the rowsource, though not always - it sometimes just crashes the whole file and everything needs restarting, upon which the table is fine and entry is evident.
I have tried resize, addrow to bottom of table variations and all result in the same core problem of a table corruption that crashes the file.
I'm looking to set up a combo box with different year options and add functionality so the data that can be seen on the sheet at a given time is driven by the combo box year value. (functionality somewhat like a webpage, where once you choose a certain value from a drop down box, you see data corresponding to the value)
I have 3 sets of table in a sheet, namely, BK,DC & BDM. Each of the table to shows the result (extracted from other sheets) for 12months and the rating that correspondence with the result. There is also 2 combobox and a commandbutton at the bottom of the sheet. The combobox1 is to select the item (BK,DC or BDM) and combobox2 is to select the month. This is because i need to create something whereby, once the item and month is selected, then the user is able to click on the commandbutton and a small window will appear to indicate the year to date result (extracted from the tables)
For example, if the user select BK in combobox1 and April in combobox2, then when they click on the commandbutton, the following happens: -
1. Calculate the average percentage of the performance from Jan - Apr (I'm using the Excel formula for step 1 & 2) 2. Generate Rating 3. Populate the result in a small pop-up window which has the header as per what is selected in combobox1.
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?
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
I 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.
I'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
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...
I have a userform where I have 2 comboboxes. The first combobox shows the the first column (only 1 of each) and the second comboBox shows me the secondary list that correlates to the valuse in the first from column B. Now I have a text box that I am trying to get the value from column C depending on what I have in the first 2 comboboxes. What is the easiest way to do it? This is all in VB since it is a UserForm, and using Vlookup seems to be too many lines if I go that route. Is there a way to use Index and Match in VB where it would be more efficient? I attached just a sample of how the data would be layed out in the Excel sheet.
I am trying to populate a combobox (CboMilestones) based on the project number that appears in CboProjNum. I need the values of certain columns to be added to CboMilestones. My spreadsheet is laid out in a paticular order based on a SQL upload that I will have to perform (1st column = project number, 2nd column = milestone 1, 3rd column = must be blank, 4th column = forecasted date, 5th column = actual date, 6th column = Milestone 2, 7th column = blank, 8th = forecasted date, 9th column = actual date....this repeats all the way to milestone 160) I need CboMilestone to populate with all the milestones on the row of selected project number, and then I need TxtADate and TxtFDate to display the dates of the selected milestone for the selected milestone.
Below is a pic of my spreadsheet and a pic of the code i have so far.
I have 2 comboboxes on a userform. In combobox1 I have a list of years which is pre-populated. In combobox2 i have some data. What i'd like to do is to sort combobox2 using the year selected from combobox1.
I have tried this slightly modified code from a different project, but cant get it to work correctly. The code below autofilters, and selects the correct range, but will not populate the userform combobox... the highlighted row seems to be the problem:
Dim rngToCopy As Range With Sheets("Project") .AutoFilterMode = False .Range("B:B").AutoFilter field:=1, Criteria1:=ComboBox6.Value With .AutoFilter.Range On Error Resume Next Set rngToCopy = .Offset(1, -1).Resize(.Rows.Count - 1).Resize(, 3) On Error GoTo 0 If rngToCopy Is Nothing Then MsgBox "No projects currently set up for the selected season!...": Exit Sub End With rngToCopy.Copy Destination:=UserForm5.ComboBox2.List .AutoFilterMode = False End With
In my data, i'd like to return columns A, B and C.
I'm trying to use combobox1, say, department, to filter items listed in combobox2, say, employees. I don't want all employees from different departments listed in the combobox2 so as to make the user spend time looking, but only names of a particular department once that department is selected in combobox1.
I'm having trouble with my combo box which was created using the ActiveX controls. The reason for wanting to do this is I want the combo box to be able to capture the values in range when the spreadsheet is updated without having to manually updated the listfillrange everytime
Code is below, and the red highlighted line is where the error is occuring
Private Sub update1() Dim i As Long Dim col As Long i = 1 col = 1 With combox1 Do Until Cells(i, col).Value = "Totals" .ListFillRange Cells(i, col).Value Loop End With End Sub