I usea form with check boxes. I have code that If one box is checked
Then change a list to "1"

Private Sub XXX_AfterUpdate()
If (Me.XXX = -1) Then
Me.List117 = "1"
End If

I want to write a code that if two (or more) boxes are checked Then
change list to 2

Private Sub XXX_AfterUpdate()
If (Me.XXX = -1) and
If (If Me.YYY = -1 ) Then
Me.List117 = "2"
End If

I would appreciate any help.

Have you checked Access HELP for the syntax on the If...Then function?

Perhaps:
If (Me!XXX = -1) And (Me!YYY = -1) Then
'do this
Else
'do that
End If

Regards

Jeff Boyce
Microsoft Office/Access MVP


<(E-Mail Removed)> wrote in message
news:(E-Mail Removed)...
>I usea form with check boxes. I have code that If one box is checked
> Then change a list to "1"
>
> Private Sub XXX_AfterUpdate()
> If (Me.XXX = -1) Then
> Me.List117 = "1"
> End If
>
> I want to write a code that if two (or more) boxes are checked Then
> change list to 2
>
> Private Sub XXX_AfterUpdate()
> If (Me.XXX = -1) and
> If (If Me.YYY = -1 ) Then
> Me.List117 = "2"
> End If
>
> I would appreciate any help.
>