Selecting values in a list box with code

[Anthony Cravero]

Hi all,

I'm using Access 97 and trying to incorporate a "select all" button that
will select all the items in a multi-select list box. Is there a site out
there, or some simple code that I can use to do this?

Thanks,
Anthony

 

[Rick Brandt]

Hi all,

I'm using Access 97 and trying to incorporate a "select all" button that
will select all the items in a multi-select list box. Is there a site out
there, or some simple code that I can use to do this?

Dim i As Integer

Do Until i = Me.ListBoxName.ListCount
Me.ListBoxName.Selected(i) = True
i = i + 1
Loop