Assuming the values go to textboxes, this stps the counter going above 100

Private Sub SpinButton1_SpinUp()
With TextBox1
.Value = .Value + 1
If .Value 100 Then
.Value = 100
End If
End With
End Sub

This shows how to increment one, decrement the other

Private Sub SpinButton1_SpinUp()
With TextBox1
.Text = .Text + 1
If .Text 100 Then
If TextBox2.Text 0 Then
TextBox2.Text = TextBox2.Text - 1
Else
.Text = .Text - 1
End If
End If
End With
End Sub

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

"Nikki" wrote in message
om...
Hi

I have two incremental counters on a form where users can enter two
scores (home and away). I want to limit the total of the two scores to
100. I'm thinking of two options and would appreciate any help with
how to do it.

Let's assume the total of the two scores is currently 100 and the user
clicks on the up arrow to increase the home score by 1, the options
a

1. The home score doesn't change and an error message appears asking
the user to reduce the away score first.
[On this one I don't know how to stop the home score increasing. The
score continues to increase within its own parameters.]

or

2. The home counter increases as the user clicks the up arrow but the
away score decreases to maintain a maximum total of 100.

Win2K XL2K

Many thanks
Nikki