with userform1.listbox1
.columncount = 5
.List = Application.Transpose(Range("D1:CT5").Value)
end with
userform1.show
--
Regards,
Tom Ogilvy
"viswanthank" <viswanthank.1qd4hy@ wrote in message
...
Hi I am doing some programming with VBA on excel and I am trying to fill
a list box with data from a range of cells on an excel sheet. I just
could not figure out how to do this.
ex:
with userform1.listbox1
column count = 5
column = ("D1:CT5")
end with
userform1.show
If somebody can help me out, that will be great.
Thanx,
Viswanthank
--
viswanthankPosted from http://www.pcreview.co.uk/ newsgroup access