list property of listbox

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

x taol - 20 Jan 2006 12:50 GMT

please see the code below

sub btn_click()
'lis == listbox control in userform
set rng = range("a2:a5")
lis.list=rng.value 'it's ok
set rng = range("a2")
lis.list = rng.value 'it' not ok

'how can i ??
'i don't want to use "additem".

end sub

Reply to this Message

Dave Peterson - 20 Jan 2006 18:04 GMT

If rng.Cells.Count > 1 Then
lis.List = rng.Value
Else
lis.List = Array(rng.Value)
End If

> please see the code below
>
[quoted text clipped - 11 lines]
>
> *** Sent via Developersdex http://www.developersdex.com ***

Signature

Dave Peterson

Reply to this Message

x taol - 20 Jan 2006 19:39 GMT

please is it possible making with one syntex without if statement?

for example

lst.List = ~~~~

Reply to this Message

Dave Peterson - 20 Jan 2006 19:50 GMT

isn't .list expecting an array?

> please is it possible making with one syntex without if statement?
>
[quoted text clipped - 3 lines]
>
> *** Sent via Developersdex http://www.developersdex.com ***

Signature

Dave Peterson

Reply to this Message