LISTBOX PROPERTIES

B

browie

Is it possible to have a listbox populate using the activesheet range
a1:b100



Thanks in advance
 
S

StinkeyPete

Try this:

With Worksheets(1)
Set lb = .Shapes.AddFormControl(xlListBox, 100, 10, 100, 100)
lb.ControlFormat.ListFillRange = "A1:B100"
End With
 
Top