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.
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...
Is it possible that i fill the CB.list with range().value so the values are in Column 'A' and in Column 'C' and if i enter the field and select value then i see value from column 'A' & value in Column 'C'?
Then if i pick one value then the CB.value = the value from Column 'A' only, Can i solve it some how?
I have a userform that I wish to be a front page for a work sheet containing personal staff information. I would like it to self populate according to a selection from a combo box (Surname). So far I am using the code below however where this code encounters those with the same surname it only displays the first row it comes across. Each row does have a staff ID number that is unique but I cannot search by this on its own as it would not be user friendly.
VB: Private Sub ComboBox1_Change() Dim r As Range Set r = Sheet2.Range("A:A").Find(What:=ComboBox1.Text, lookat:=xlWhole, MatchCase:=False) If Not r Is Nothing Then
I want it to populate a combobox in a userform. Should it go in the code segment for the userform, in a module, or some other place? The following is code I originally found (by Leith Ross of this board) to find the last row in column "A", and load the combo box "ComboBox1"
Basically I want it to look similar to the vehicle search on auto trader, or whatcar, where you first chose the make, then use a second combobox for the model (dependent on the choice made in the first combobx.
I am trying to add a list of items to a combo box which is in a user form using vba. Find the file as attached. My code is as follows: when i double click on the combo box it opens editor.( 4th item: Frequency )
Private Sub ComboBox1_Change() With .ComboBox1 .AddItem "Y" .AddItem "M" .AddItem "D"
I have created a user form that needs dependent combo boxes. I have created multiple lists to use for different types of contacts and just want to use the if function to say that if combo box one's value is this, combo box two will use this list in its drop down box. This is what I have at the moment below.
cbosoi is combo box one and cboname is combo box 2. If I select Duty_manger from the first list I want it to point to the Duty_Manager list for combo box 2. It does that but it selects the duty manager list for anything I select in combo box one!
If cbosoi.Value = duty_manager Then Me.cboname.List = Worksheets("lookuplists comms").Range("duty_manager").Value End If
I am a total noob when it comes to userforms. I want to create a userform with a simple combobox that contains 4 different selections. Along with this combobox will be a Submit button and a Cancel button.
I am trying to develop an easier way for our corporate card holders to 'code' their monthly statements. Instead of each card holder receiving a statement and filling out a coding form in excel and printing it out, I would like to email them an excel doc of their specific charges for the month and allow them to use drop down lists to code the transactions. They can then email it back to me, and then we're done! Well, there would be a few more steps but basically, I'm trying to build a dynamic excel doc that would do two things:
1) Conditional drop down boxes so that, depending on their cost center, once they choose their cost center from the first drop down, it would zero them in on only their own account codes in the second box. The second account box would also be a combo box and show the account name once selected.
2) The second I'm not sure about.....is it possible once the conditional drop down box works, to make copies of the 'All Detail' sheet to then narrow down the info to only one card holder? So if the 'All Detail' sheet had all the charges for all the card holders for the month and the conditional drop down worked, could I then make copies of the 'All Detail' sheet, rename it to the one card holder, delete all the transactions except for those relevant to that card holder, and the conditional drop down box would still work? I ask this question because I build an early version (that didn't really work) based on a macro that had code specific to the sheet name. It wouldn't work once I tried to make copies of the sheet and rename it.
As Im struggling to find a resolution to my protection problems from another thread, I thought id try to work a way around it. Now I am having a problem with what i thought would be a relatively simple issue: When contents of cell A1 is word "TRUE", then ComboBox1's backcolor is white. Else ComboBox1's backcolor is grey THis is the code I have been trying to manipulate, by placing it in the worksheet coding:
Private Sub ComboBox1_Change() With ComboBox1 If Cells(32, 5) = True Then .BackColor = &HFFFFFF Else .BackColor = &HC0C0C0 End If End With End Sub
I'm attempting to add the values for a combobox and (2) text boxes to a list box on a form. The list has 3 columns. When I run code to add to the list box the values are added on separate rows instead of the same row. See code below and attached screen shot.
VB: Private Sub cmdAddToList_Click() Dim i As Integer Dim iRow As Integer If Me.cboParts.ListIndex = -1 Then Exit Sub For i = 0 To Me.lstParts.ListCount - 1
I have a combobox on a userform that I have set the columncount to 3, so it displays data from columns A, B, and C when the combobox dropdown is used. However, once someone makes a selection from the dropdown, only the item from the first column is displayed in the combobox. Is there a way for me to show the info from all 3 columns once a selection is made?
I am trying to populate (via VBA) a textbox/combo box from one user form to another user form.
The first user form has a room number in a text box1. If certain conditions exists, a button is selected to bring up another user form (both forms are modeless).
I want to pass/populate some of the 1st user Form info into the other user form.
I have tried the on initialize textbox1.value = textbox other.value but no dice. I can populate a user form text box from a spreadsheet but from box to box in separate user forms has me a little stumped.
I've have a combobox on a userform which should refer to a cell on a worksheet directly. E.g. The dropdown list that feeds to box is on Sheet2 range C1:C6 Whatever is selected should be copied to Sheet1 cell B18.
Now, if I populate cell B18 manually, it will pick it up, but if I then change the combobox selection, cell B18 either doesn't change or goes blank.?
I have a userform1 on there a combobox1 and a frame1. In that frame1 I want a number of labels to be added named "name" & number. The number varies depending on the value in combobox1. If combobox1 = "1" then I want 20 labels to be added. if combobox1="2" then I want 60 labels to be displayed.
label height=12, width=102, top=6 and left=6
for each following label the top = top + 14 and after each 10th label left = left + 120
If there's more than 30 labels then I need a scrollbar on the bottom of the frame to be displayed and so be able to see the other labels.
If the first value in combobox1 is "1" is selected and all is displayed and then I select "2" that is deletes all the current labels in the frame and then add 60 new labels.
I have a list of machine manufacturers in a comboBox and type of the machines they make listed on a excel sheet. When the user chooses the company from the combobox.list I want the machines types appears at the textbox below
Sheets("Sheet1").Shapes("ComboBox1").Select Selection.ListFillRange = "='Sheet1'!$b$15:" & comborange & "" where comborange = cell reference of the last cell in my range..
I have moved this combo box to a userform now and I'm trying to populate the box via one of the userforms triggers.. My problem is I can't figure out the syntax to select the combobox on the userform.. it doesn't seem to be handled the same way as when it was on the worksheet..
I've been trying for hours to populate a textbox on a userform based on a combo box. I'm including a zip of my workbook to see. (don't laugh to hard at my code, like I said I'm green...:) When you select a mix design in my form I want the next six combo boxes to populate. The way I have it now is based on one of the many examples found here, (none of which have worked for me so far, but this one said "the simplest way to do this is......") And I get an error 425 - "Object not found". I've done searches based on the error but haven't found an answer.