Scorer sheets

ageordieinneed

New Member
Joined
Jun 20, 2019
Messages
21
Hi all newbie here and not the best with excel or vba :eeek:
i am doing a darts scorer with a few macro button(180,140,100) and vlookup (3 dart, 2 dart finishing) which seem to work great
:biggrin:
so here goes
1, when 501(k21 or m21 reaches 0 it adds +1 value to i5 or o5 1st one to zero wins the 1 instead of pressing a win button on the player and resetts k21 and m21 to 501?
:confused:
2, is there a way of making it call the numbers ie say i score/type 100 i hear it say 100 which i have all media file on pc

help much appreciated

 

Excel Facts

Wildcard in VLOOKUP
Use =VLOOKUP("Apple*" to find apple, Apple, or applesauce
Re: Scorer sheets help

@ageordieinneed
Assuming that you don't already have vba code for your scoresheet's Change Event that this might conflict with, the below should help you with 1.

In the vb editor, double click the sheet reference and paste the below into the code pane.

Code:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Cells.Count > 1 Then Exit Sub
If Not Target = 0 Then Exit Sub
If Intersect(Target, Range("K21,M21")) Is Nothing Then Exit Sub
Application.EnableEvents = False
If Target.Column = 11 Then  'K
Range("I5") = Range("I5") + 1
Else: Range("O5") = Range("O5") + 1  'M
End If
Range("K21,M21") = 501
Application.EnableEvents = True
End Sub

Hope that helps.
 
Last edited:
Upvote 0
Re: Scorer sheets help

hi mark858
i have dl a few of these but i've put a few buttons in with vba in the sheet much quicker in think
cheers
 
Upvote 0
Re: Scorer sheets help

hi snakehips and cheers for the reply
nothing happen when k21 or m21 reaches zero?
cheers

Where did you put the code? In a sheet module or a regular module and how are you triggering it? Manually, by formula or code?
 
Last edited:
Upvote 0
Re: Scorer sheets help

hi snakehips and cheers for the reply
nothing happen when k21 or m21 reaches zero?
cheers

I assumed you are entering 0 in K21 0r M21?
I'm now thinking that you are entering the score in another cell and that K21 & M21 contain a formula that will eventually resolve to zero?
Let me know and I will re-code.
 
Upvote 0
Re: Scorer sheets help

hi
i put the vba in the sheet 1 =general, which has a code already in to more the curser
the formula is in k11 and m21 ie =(L3-SUM(K3:K20)) =(L3-SUM(M3:M20)) the l3 is the 501
hope this helps
 
Upvote 0

Forum statistics

Threads
1,223,164
Messages
6,170,444
Members
452,326
Latest member
johnshaji

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top