I am want to use a form to allow the user to enter criteria for the report. Here is my unclick command.
Private Sub byAgent_Click()
If IsNull(Me.agentselect) Then
MsgBox "Please choose an agent"
Else
DoCmd.OpenReport "printevalbyagent", , , "[CSRName]= Me.agentselect"
End If
End Sub
Any ideas, why i can't get it to work.
Private Sub byAgent_Click()
If IsNull(Me.agentselect) Then
MsgBox "Please choose an agent"
Else
DoCmd.OpenReport "printevalbyagent", , , "[CSRName]= Me.agentselect"
End If
End Sub
Any ideas, why i can't get it to work.