list box

[IanT]

Hi
Is it possible to automatic select all the data shown in a list box instead of clicking on all of the data!

 

[IanT]

Code to select items in list box

Have found some code, for anyone interested:

Dim lngSelection As Long
For lngSelection = 0 To Me!lstData.ListCount - 1
Me!lstData.Selected(lngSelection) = True
Next lngSelection