Selection all values in a List box by default

[Muzzy]

On the click of a button I need to Select all values in a List box(lstSelected), any ideas how to do this using VBA?

 

[hermanlaksko]

Not sure if I understand you, but your listbox has a recordsource you could use this with
me!listBox.recordsetclone this will give the records of the listbox.

 

[Muzzy]

Unfortunately not very helpful. I have 2 list boxes lstAvailable, lstSelected. I choose items of data from lstAvailable and send it to lstSelected. Now I need to be able to highlight my selections using VBA.

 

[bujin]

Am I right in thinking you just want to select all the items in the list?

In that case:

Dim i as Integer

For i = 0 to lstSelected.ListCount - 1
lstSelected.Selected(i) = True
Next i