I'm in need of a small tweak for option group.

[Bayou BoB]

Hi!

I used all of the suggestions from last night, and it almost works.
I'm having trouble generating the reports off of my button now that I
have added two new options. There's something missing
here....particularly with option 3. I don't think it can be the same
as Case 1 when it's selecting something different. What have I left
out here? It worked great obviously when it was just two cases. Thanks
in advance!

Kevin

Select Case [Frame91]
Case 1 'All Clients
stWhere = ""
Case 2 'Single Client
If Not IsNull(Combo30) Then
stWhere = "ClientID=" & Me!Combo30
Else
MsgBox "Select a Single Client First"
Me.Combo30.SetFocus
Case 3 'All Staff
stWhere = ""
Case 4 'Single Staff
If Not IsNull(Combo75) Then
stWhere = "EmployeeID=" & Me!Combo75
Else
MsgBox "Select a Single Staff Member"
Me.Combo75.SetFocus


End If
End Select

 

[Kelvin]

You are forgetting an End If at the end of Case 2.

Kelvin