User forms and Combo boxes

[Padawan018]

I have a combo box on a user form and want to populate the combo box with data I have stored on a worksheet. How do I populate the combo box with the data.

e.g.
user form starts on sheet1 and combo box data on sheet2.

Thanks in advance.

 

[Smitty]

Welcome to the Board!

Here's one way:

<font face=Tahoma><SPAN style="color:#00007F">Private</SPAN> <SPAN style="color:#00007F">Sub</SPAN> UserForm_Initialize()
    <SPAN style="color:#007F00">'   Add a list from a sheet</SPAN>
    <SPAN style="color:#00007F">Dim</SPAN> i <SPAN style="color:#00007F">As</SPAN> <SPAN style="color:#00007F">Integer</SPAN>
    <SPAN style="color:#00007F">Dim</SPAN> ws <SPAN style="color:#00007F">As</SPAN> Worksheet
        <SPAN style="color:#00007F">Set</SPAN> ws = Sheets("Sheet2")
        <SPAN style="color:#00007F">For</SPAN> i = 1 <SPAN style="color:#00007F">To</SPAN> 12
            ComboBox1.AddItem ws.Cells(i, 1)
        <SPAN style="color:#00007F">Next</SPAN> i
<SPAN style="color:#00007F">End</SPAN> <SPAN style="color:#00007F">Sub</SPAN></FONT>

The example loads a list of 12 months from Sheet 2, range A1:A12.

HTH,

Smitty