If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below. |
|
|
Thread Tools | Display Modes |
#1
|
|||
|
|||
Count and Reset Button Clicks
Hello Experts.
I have a Yahtzee game with 2 buttons/2 macros. One button (Roll Dice) rolls the dice (Calculate) and the second button (Next Player) clears all checkboxes on the sheet. However, I'd like to know if there's a way to disable the first button after it's been clicked 3 times, then re-enable it once the second button is clicked and start the count over... Please advise. I thank you for your time. |
#2
|
|||
|
|||
Count and Reset Button Clicks
We can use a Global variable to communicate between the two macros:
Dim IAmTheCount As Integer Sub FirstButton() If IsEmpty(IAmTheCount) Then IAmTheCount = 0 End If IAmTheCount = IAmTheCount + 1 If IAmTheCount 3 Then Exit Sub ''''''''''''''''''''''''''''''''''''''''' ' your stuff MsgBox "doing button #1 things" ''''''''''''''''''''''''''''''''''''''''' End Sub Sub SecondButton() IAmTheCount = 0 ''''''''''''''''''''''''''''''''''''''''' ' your stuff MsgBox "doing button #2 stuff" ''''''''''''''''''''''''''''''''''''''''' End Sub Once the first macro increments the count to three, it does not proceed. The second macro clears the counter and allow the first macro to resume. -- Gary''s Student - gsnu201002 "Arlen" wrote: Hello Experts. I have a Yahtzee game with 2 buttons/2 macros. One button (Roll Dice) rolls the dice (Calculate) and the second button (Next Player) clears all checkboxes on the sheet. However, I'd like to know if there's a way to disable the first button after it's been clicked 3 times, then re-enable it once the second button is clicked and start the count over... Please advise. I thank you for your time. |
#3
|
|||
|
|||
Count and Reset Button Clicks
Alright, Student of Gary.
I'm all excited to try this. Thanks for explaining the pieces as well. p.s. I'll be right back if I hit any snags. But thanks again. "Gary''s Student" wrote: We can use a Global variable to communicate between the two macros: Dim IAmTheCount As Integer Sub FirstButton() If IsEmpty(IAmTheCount) Then IAmTheCount = 0 End If IAmTheCount = IAmTheCount + 1 If IAmTheCount 3 Then Exit Sub ''''''''''''''''''''''''''''''''''''''''' ' your stuff MsgBox "doing button #1 things" ''''''''''''''''''''''''''''''''''''''''' End Sub Sub SecondButton() IAmTheCount = 0 ''''''''''''''''''''''''''''''''''''''''' ' your stuff MsgBox "doing button #2 stuff" ''''''''''''''''''''''''''''''''''''''''' End Sub Once the first macro increments the count to three, it does not proceed. The second macro clears the counter and allow the first macro to resume. -- Gary''s Student - gsnu201002 "Arlen" wrote: Hello Experts. I have a Yahtzee game with 2 buttons/2 macros. One button (Roll Dice) rolls the dice (Calculate) and the second button (Next Player) clears all checkboxes on the sheet. However, I'd like to know if there's a way to disable the first button after it's been clicked 3 times, then re-enable it once the second button is clicked and start the count over... Please advise. I thank you for your time. |
#4
|
|||
|
|||
Count and Reset Button Clicks
Gary's Student,
Perfect. But now you got me thinking. How can I make that message box pop up ONLY after you've exceeded your 3 rolls, with a message like "Quit Cheating, You Sonuva*&%@!" I'll keep shuffling code around, but if you see this, let me know. Thanks again! "Gary''s Student" wrote: We can use a Global variable to communicate between the two macros: Dim IAmTheCount As Integer Sub FirstButton() If IsEmpty(IAmTheCount) Then IAmTheCount = 0 End If IAmTheCount = IAmTheCount + 1 If IAmTheCount 3 Then Exit Sub ''''''''''''''''''''''''''''''''''''''''' ' your stuff MsgBox "doing button #1 things" ''''''''''''''''''''''''''''''''''''''''' End Sub Sub SecondButton() IAmTheCount = 0 ''''''''''''''''''''''''''''''''''''''''' ' your stuff MsgBox "doing button #2 stuff" ''''''''''''''''''''''''''''''''''''''''' End Sub Once the first macro increments the count to three, it does not proceed. The second macro clears the counter and allow the first macro to resume. -- Gary''s Student - gsnu201002 "Arlen" wrote: Hello Experts. I have a Yahtzee game with 2 buttons/2 macros. One button (Roll Dice) rolls the dice (Calculate) and the second button (Next Player) clears all checkboxes on the sheet. However, I'd like to know if there's a way to disable the first button after it's been clicked 3 times, then re-enable it once the second button is clicked and start the count over... Please advise. I thank you for your time. |
Thread Tools | |
Display Modes | |
|
|