Fill multiple comboboxes with same values

**aman1234** · 05-13-2010, 05:04 AM

Hi guys

I hope anyone can help me in this. I have around 10 comboboxes and I want to fill them with the same values in userform_initialize event. I know we can do likt he following
combobox1.additem "aaa"

But as there are abount 15 values and around 10 comboboxes so its very time consuming to write so many statements to fill the values.

Can anyone please give me a easy method to do this.

Thanks

**romperstomper** · 05-13-2010, 06:11 AM

Put them in a range, then assign that to the list property:

Dim varData
varData = Sheets("data").Range("A1:A15").Value
me.combobox1.List = vardata
me.combobox2.list = vardata
' etc

if your comboboxes have default names like combobox1 and combobox2, you could also use a loop to go through all 10.

**aman1234** · 05-13-2010, 06:38 AM

Thanks a lot romper for your help. It worked perfectly fine. You are always helping. Thanks so much.

**dougman824** · 06-12-2017, 06:00 PM

Hello,

I am trying to do something similar with a userform. I have 30 comboboxes that all will have the same options to
pick from so I would like to fill them with a loop. I also, if possible would like the range to be able to change if I have the list expand from user input. If both are not possible I can make it work without the dynamic list.
Right now this is what I have:

All of the comboboxes names start as "PMEmployeePT" and then a number.

The error I get is: Could not set the list property. Invalid property array index (I also get similar things if I try rowsource)

Sub PM_Systems_Loadcombos()

Worksheets("Employees").Activate

For i = 1 To fsrform.PMEmployees.Value
Dim EmployeeTitle
EmployeeTitle = Worksheets("Employees").Range("a3:a" & Rows.count).End(xlUp).Row
fsrform.Controls("PMEmployeePT" & i).List = EmployeeTitle
Next

End Sub

**FDibbins** · 06-13-2017, 01:55 AM

Doug, welcome to the forum

Unfortunately your post does not comply with Rule 2 of our Forum RULES. Do not post a question in the thread of another member -- start your own thread.

If you feel an existing thread is particularly relevant to your need, provide a link to the other thread in your new thread.

Old threads are often only monitored by the original participants. New threads not only open you up to all possible participants again, they typically get faster response, too.