Highlight everything in a Listbox

[Bob]

Is there a code to add to a button to highlight everything (line) in a list
box?

Thanks in advance.........Bob Vance

 

[Bob]

Sorry it is Unbound and Simple Muli select,,,Thanks

 

[Bob]

Oops, Just discovered by changing it to (Extended) and using the shift key
does it...Is this acceptable?? Thanks Bob

 

[fredg]

Is there a code to add to a button to highlight everything (line) in a list
box?

Thanks in advance.........Bob Vance

Make sure the ListBox MultiSelect property is set to either Simple or
Extended.

Dim x as Integer
For x = 0 To ListBoxName.ListCount - 1
Me.ListBoxName.Selected(x) = True
Next x