Hi Sjoerd
Dim L As Long
Randomize
L = Int(Rnd() * Me.ListBox1.ListCount)
ListBox1.ListIndex = L
HTH. Best wishes Harald
"asd987" <asd987@home.nl> skrev i melding
news:cm0jum$h2o$1@news5.zwoll1.ov.home.nl...
> Hello,
>
> How can I pick at random one item from a ListBox?
>
> Thanks,
>
> Sjoerd
>
>