View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Ron de Bruin Ron de Bruin is offline
external usenet poster
 
Posts: 11,123
Default multiselect listbox

Try this

N = 0
For i = 0 To Userform1.ListBox1.ListCount - 1
If Userform1.ListBox1.Selected(i) = True Then
N = N + 1
End If
Next i
If N = 0 Then MsgBox "no selection"


--
Regards Ron de Bruin
(Win XP Pro SP-1 XL2000-2003)
www.rondebruin.nl



"CG Rosén" wrote in message ...
Good Day Group,

What syntax to use to state that a MultiSelect
Listbox has no selection? To be used in the context:
If ListBox1 .....no selection.... Then etc...

Brgds

CG Rosén