listbox1.rowsource = Worksheets("Sheet1").Range("A1:A10").Address(,,,Tr ue)

--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)

"jhahes" wrote in
message ...

Can someone please help me with a code that puts

the row source of the list box to the activecell


listbox1.rowsource =


--
jhahes
------------------------------------------------------------------------
jhahes's Profile:
http://www.excelforum.com/member.php...o&userid=23596
View this thread: http://www.excelforum.com/showthread...hreadid=555016