List Box Items

J

Jason

I am trying to create a list box that is populated with
items from a row. For example: A2=red B2=blue C2=green.
then the first value in the combobox is red, the second is
blue, the third is green and so on.
 
B

Bob Phillips

Set the Input Range (if a Forms Listbox) the RowSource property (Controls
listbox), or the ListFillRange (Userform listbox) to that range address.

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)
 
M

Mark E. Philpot

try this:
sub addMe()
sheets("Sheet1").select
Range("A2").select
do
set a=selection
with listBox1
..additem (a)
end with
activecell.offset(0,1).select
loop until a=""
end sub

This is quick and dirty and may add a blank line to the
bottom of the listbox.

regards
Mark
 
Top