Help with marco for darts sheet

Hello all,

New to the forum and a beginner with VBA.

I have a spreadsheet that I use to help some friends and I with keeping score in a darts game. I have it set up to automatically keep track of any scores of a certain value. If you play darts or watch it on TV, you know they track scores over 100 called 'Tons'. They will also track if you hit a 120, 140 or 180. I have my spreadsheet arranged to count these scores, as well as the number of games played to a certain point. I have a button to reset the entire sheet and another to reset just the score input area. When I reset the score input area, it will also reset the 100/120/140/180 counts. I'd like these values to continue being added until the button to reset the entire sheet is pressed.

Any help that could be provided would be appreciated. The code is as follows:

Please Login or Register  to view this content.

What's the code attached to the buttons?

Originally Posted by StephenR

What's the code attached to the buttons?

To reset just the score entry area, and to add 'legs' and 'sets' for a match is:

Please Login or Register  to view this content.

To reset the full sheet:

Please Login or Register  to view this content.

Originally Posted by Tinbendr

Welcome to the board!

Please Login or Register  to view this content.

I've actually tried this, but as I'm imputting scores it will add more than 1 to D8. For example, i'll input 100 in the O column and 1 will show in D8. When I input another 100, the cell D8 will show up as 3 instead of 2 as there is now have a 1 in the value D8 and the value of 'a' will be 2.

Note: I also have this 'Private Sub' running in the sheet script. I'm wondering if this is the cause due to the "Is Nothing" or "IsEmpty" statements...

Please Login or Register  to view this content.

I have no idea how to do any of that.

are you forwarding results to a master database, or is the app intended to be just used during a single match, all entries forgotten afterwards ?

Here's what I have/want/need. Don't know if this will help or not for a visual.

In the picture below, you input the scores into column O like in the box marked "1". The scores that are kept track of show up in box "2". To do this is the code I posted originally called 'TonPlus1' that is automatically done using the 'Private Sub Worksheet_Change' code I also posted later. When I push the button marked "4", I clear the O column in box "1" (and the Q column) and add a leg to the cell next to button "4" and that code is the 'Winner1' code I posted. When that happens and you start inputting new scores in the O column, the totals in box "2" reset, which is what I don't want to happen until you press the button marked "3". The button "3" would clear the scores in column O and Q, the Legs and Sets, and the totals in box "2" as shown in the 'Clear Game' code I posted.

So again, I'm trying to set it up to continuously count the scores in box "2" until button "3" is pressed but not when button "4" is pressed. I'm wondering if it's because of the 'Private Sub Worksheet_Change' code?

Hi DJRyan25

Hi DJRyan25,

sounds like it is time to actually load a copy of your spreadsheet so we can actually see what it is doing and then work out how to fulfill you original request

Jmac

The file was too large to upload here, so I used WeTransfer to e-mail it to myself. See link below. Download good until Feb. 3rd.

Electronic Darts Scoreboard

Hey guys,

please disregard the attachment on my last post. It was missing a tab. See new attachment here.

Sample Darts Sheet 2014_02_19.xls

Anybody? Anybody?

Bueller? Bueller?

You need to set some values to the variables you're using, see the changes in the code below

Player 1

Please Login or Register  to view this content.

Player 2

Please Login or Register  to view this content.

ThirtyTwo,

That does help with not "resetting" the values when I start a new leg, but it's still 'double firing' like a previous code offered by Tinbendr. Also, if I input a value that is less than 100 after a value that is greater than 100, it will add to to the values that are there.

ThirtyTwo,

That works ideally. I greatly appreciate the help. If I lived closer, I'd buy you a few drinks at a local pub! Since Paddy's Day is coming up... Slàinte!

I'm pleased we got there in the end

But as you've said, we live to apart for you to buy me a pint, so the best think you can do for me is click - * Add Reputation

btw - I also gave some thought to lazy score keepers, give them the option to enter per dart score, rather than the total of three. This would also give benefits of recalculating new outs as each dart is thrown