ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Two Counters Limit Total (https://www.excelbanter.com/excel-programming/298151-two-counters-limit-total.html)

Nikki[_2_]

Two Counters Limit Total
 
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

Bob Phillips[_6_]

Two Counters Limit Total
 
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




Paul Robinson

Two Counters Limit Total
 
Hi
I'd go with option 2 every time.
Double click ComboBox1 in the VB editor and use

Private Sub ComboBox1_Change()
ComboBox2.Value = 100 - ComboBox1.Value
End Sub

You could allow edit in both boxes by doing the same sub for ComboBox2.

regards
Paul

If they are combobox1 and combobox2 then
(Nikki) wrote in message . com...
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



All times are GMT +1. The time now is 10:50 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com