I thought I would post up a spreadsheet that automatically does what a lot of people want - clear the status field once a bet has been placed.
There are a few ways of doing this but I am going to go down the VBA route and tie this with a reset flag.
In a cell somewhere on your worksheet, say sheet 2, cell A1 (never use the Bet Angel worksheet for calculations) type in the following:
Code: Select all
=IF(COUNTIF('Bet Angel'!O6:O67,"")<61,"RESET REQUIRED","")
You can then create a Sub in a module to clear the cells. Use this code:
Code: Select all
Sub Reset_Bet()
Application.ScreenUpdating = False
Sheets("Bet Angel").Select
Range("O6,O9,O11,O13,O15,O17,O19,O21,O23,O25,O27,O29,O31,O33,O35,O37,O39,O41,O43,O45,O47,O49,O51,O53,O55,O57,O59,O61,O63,O65,O67").Activate
Selection.ClearContents
Range("A1").Select
Application.ScreenUpdating = True
End Sub
Code: Select all
Private Sub Worksheet_Calculate()
If Range("A1") = "RESET REQUIRED" Then Call Reset_Bet
End Sub
The attached sheet has all the above. Connect it to Bet Angel and try it out.