Need help cleaning up this Select Case statement, I'm close.

[GinaFlan]

I need help cleaning this up. I was practicing trying it myself I know I am close but need help.







Select Case Comboyesorno
Case "Yes"
Select Case Me.txtBenchmarks
Case "Revenue recorded incl. claims", "Free lunch for all students Yes/No", "Physical count conducted", "Prvide updted number of students daily rolled up monthly"
Me.txtMetGoal = "Met Goal"
End Select

Case Comboyesorno
Case "No"
Select Case Me.txtBenchmarks
Case "Revenue recorded incl. claims", "Free lunch for all students Yes/No", "Physical count conducted", "Prvide updted number of students daily rolled up monthly"
Me.txtMetGoal = "Did not meet Goal"
End Select
Case Comboyesorno
Case "Yes"
Select Case Me.txtBenchmarks
Case "No findings", "No commodities retained longer than 6 months", "No violations identified", "No major swings", "No disposals without proper recording"
Me.txtMetGoal = "Did not meet Goal"
End Select

Case Comboyesorno
Case "No"
Select Case Me.txtBenchmarks
Case "No findings", "No commodities retained longer than 6 months", "No violations identified", "No major swings", "No disposals without proper recording"
Me.txtMetGoal = "Met Goal"
End Select


End Select

[GinaFlan]

Or would it be closer to this?
Select Case Comboyesorno
Case "Yes"
Select Case Me.txtBenchmarks
Case "Revenue recorded incl. claims", "Free lunch for all students Yes/No", "Physical count conducted", "Prvide updted number of students daily rolled up monthly"
Me.txtMetGoal = "Met Goal"
Case "No"
Me.txtMetGoal = "Did not meet Goal"
End Select
End Select


Case Comboyesorno
Case "Yes"
Select Case Me.txtBenchmarks
Case "No findings", "No commodities retained longer than 6 months", "No violations identified", "No major swings", "No disposals without proper recording"
Me.txtMetGoal = "Did not meet Goal"
Case "No"
Me.txtMetGoal = "Met Goal"
End Select
End Select

[GinaFlan]

I figured out it part of the learning process




Select Case Me.txtBenchmarks
Case "Revenue recorded incl. claims", "Free lunch for all students Yes/No", "Physical count conducted", "Prvide updted number of students daily rolled up monthly"
Me.txtMetGoal = "Met Goal"
End Select
End Select

Select Case Comboyesorno
Case "No"
Select Case Me.txtBenchmarks
Case "Revenue recorded incl. claims", "Free lunch for all students Yes/No", "Physical count conducted", "Prvide updted number of students daily rolled up monthly"
Me.txtMetGoal = "Did not meet Goal"
End Select
End Select





Select Case Comboyesorno
Case "Yes"
Select Case Me.txtBenchmarks
Case "No findings", "No commodities retained longer than 6 months", "No violations identified", "No major swings", "No disposals without proper recording"
Me.txtMetGoal = "Did not meet Goal"
End Select
End Select

Select Case Comboyesorno
Case "No"
Select Case Me.txtBenchmarks
Case "No findings", "No commodities retained longer than 6 months", "No violations identified", "No major swings", "No disposals without proper recording"
Me.txtMetGoal = "Met Goal"
End Select
End Select

[ranman256]

If there's no other choice for COMBOYESORNO then no need for SELECT statement
(or is this just a sample?)

(and indentation helps readability)

If Comboyesorno = "Yes" Then
       Select Case txtBenchmarks
            Case "No findings", "No commodities retained longer than 6 months", "No violations identified", "No major swings", "No disposals without proper recording"
                txtMetGoal = "Did not meet Goal"
            Case "No"
                txtMetGoal = "Met Goal"
    End Select
End If

[GinaFlan]

Ok Thank you so much