list box error

[skd2726]

I have a report that is based on a list box in a form - the user is to pick items from the list box and then a report runs filtered on the list box ...I have tried it 2 ways ...both ways I get an the following error

"EXTRA ) in quiery expression '(Name =)'

HELP!!!


First Way:

Private Sub cmdReport_Click()
On Error GoTo Err_cmdReport_Click


DoCmd.OpenReport "CrewAssigmentReport", acViewPreview, , "Name = " & List0


Exit_cmdReport_click:
Exit Sub

Err_cmdReport_Click:
MsgBox Err.Description
Resume Exit_cmdReport_click

End Sub

2nd Way:
Private Sub Command3_Click()
On Error GoTo Err_Command3_Click

Dim stDocName As String

stDocName = "CrewAssigmentReport"
DoCmd.OpenReport stDocName, acPreview, , "[Name] = " & Forms!frm_GetReports!List0

Exit_Command3_Click:
Exit Sub

Err_Command3_Click:
MsgBox Err.Description
Resume Exit_Command3_Click

End Sub

 

[randy700]

How many columns do you have in your list box?
How about this?

DoCmd.OpenReport "CrewAssigmentReport", acViewPreview, , "Name = " & List0.column(1)

Remember, the first column in column 0.


Randy

 

[skd2726]

YEP - that worked!!! thanks