Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Trouble populating ComboBox from a range
How do I get this to work?
Private Sub UserForm_Activate() X = 0 Do While Range("CPSBs").Offset(X, 0).Value < "" Me.ComboBox1.AddItem (Range("CPSBs").Offset(X, 0).Value) X = X + 1 Loop End Sub I am not sure how to do this at all. thanks |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Trouble populating ComboBox from a range
It is not all too clear but maybe this
Private Sub UserForm_Activate() For Each cell In Range("CPSBs").Offset(X, 0) If cell.Value < "" Then Me.ComboBox1.AddItem cell.Value End If Next cell End Sub -- --- HTH Bob (there's no email, no snail mail, but somewhere should be gmail in my addy) wrote in message ... How do I get this to work? Private Sub UserForm_Activate() X = 0 Do While Range("CPSBs").Offset(X, 0).Value < "" Me.ComboBox1.AddItem (Range("CPSBs").Offset(X, 0).Value) X = X + 1 Loop End Sub I am not sure how to do this at all. thanks |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Trouble populating ComboBox from a range
You're a genius. Exactly what I wanted. Thanks
|
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Trouble populating ComboBox from a range
Dim cell As Range For Each cell In Range("CPSBs") Me.ComboBox1.AddItem cell.Value Next cell Set cell = Nothing " wrote: How do I get this to work? Private Sub UserForm_Activate() X = 0 Do While Range("CPSBs").Offset(X, 0).Value < "" Me.ComboBox1.AddItem (Range("CPSBs").Offset(X, 0).Value) X = X + 1 Loop End Sub I am not sure how to do this at all. thanks |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
trouble loading a range into a comboBox | Excel Programming | |||
Populating Combobox | Excel Programming | |||
Populating a combobox | Excel Programming | |||
Populating a ComboBox | Excel Programming |