Creating a multi-select list

[meierswa]

I have created an input form that allows a user to specify the criteria for a report. Here is the current code:

Private Sub preview_Click()
On Error GoTo Err_preview_Click

Dim stDocName As String

stDocName = "rptActivityReport"
DoCmd.OpenReport stDocName, acPreview, , "PROID=" & Me.lstprocessor & _
" AND dtReceived between #" & Me.txtStartDate & "# And #" & Me.txtEndDate & "#"


Exit_preview_Click:
Exit Sub

Err_preview_Click:
MsgBox Err.Description
Resume Exit_preview_Click

End Sub

What must I do to allow multi-selecting in the processor list? Any help is appreciated.

 

[grtammi]

How does the user specify the criteria? Thru a list box, combo box, text box, check buttons ... ? If you don't understand, just nod and smile ...

 

[meierswa]

The dates are entered using text boxes and the processors are selected in a list box.