Listbox none selected feature

[Mike Milligan]

It seems that there is no property for determining if a listbox
(multiselect) has at least one selection. Browsing this board I find the
common method below for accomplishing the task, but was surprised that no
property exists. Is it true?

For i = 0 to .listcount - 1
If .selected(i) = true then
'do something'
End if
Next i

Mike

 

[thesquirrel]

I have used this code before to determine if there is a selection:

If Me.lstManager.ListIndex = -1 Then
MsgBox "You don't have a Manager selected, please make a
selection and try again.", _
vbExclamation, "Make a Selection"
End If

This doesn't count the number of selections, but does detect if there
is a selection.

You can also use this:

If Me.lstManager.Selected = True then
'Do this code
End if

If selected = true, at least one value is selected. Likewise, if
selected = false, no selections have been made. This however only
applies to list boxes with multiselect = true.

Hope that helps

theSquirrel

 

[Mike Milligan]

I thought of listindex, but ListIndex cannot be used with a 'multiselect'
listbox, which I have.

Thanks anyway.
Mike

 

[thesquirrel]

The second part of my post listed this code as well...

You can also use this:

If Me.lstManager.Selected = True then
'Do this code
End if

This will be true if there is a selection, and false if there is no
selection.

theSquirrel

 

[Mike Milligan]

I receive an "argument not optional" error highlighting '.Selected' as the
offending property.