ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Discussion (Misc queries) (https://www.excelbanter.com/excel-discussion-misc-queries/)
-   -   Counter (https://www.excelbanter.com/excel-discussion-misc-queries/63826-counter.html)

Sdbenn90

Counter
 
I need help with either Excel or Visual basic Code to do the following.

I need a command button if clicked by the user it will count the number of
time the button was clicked. Also will need a reset button so the user can
reset the number back to Zero if they need to start over. In Visual basic I
used the Static function which works but you have to end the form or sub to
reset the number. Any help with this matter is greatly appreciated.

Bob Phillips

Counter
 
Add this code to a general module and just assign the macros to your
buttons.

Dim nCounter As Long

Sub Count()
nCounter = nCounter + 1
End Sub

Sub ResetCount()
nCounter = 0
End Sub


--
HTH

Bob Phillips

(remove nothere from email address if mailing direct)

"Sdbenn90" wrote in message
...
I need help with either Excel or Visual basic Code to do the following.

I need a command button if clicked by the user it will count the number of
time the button was clicked. Also will need a reset button so the user can
reset the number back to Zero if they need to start over. In Visual basic

I
used the Static function which works but you have to end the form or sub

to
reset the number. Any help with this matter is greatly appreciated.




Sdbenn90

Counter
 
Thank You for the help, I'm still not sure on how it works. if I want the
numbers to appear in A1. Where in the code do I tell it that A1 is where this
number to be displayed. if I insert a cmd button in C1, click the button say
5 time 5 should appear in A1. and I aplogize how do I assign the macro to the
button.

"Bob Phillips" wrote:

Add this code to a general module and just assign the macros to your
buttons.

Dim nCounter As Long

Sub Count()
nCounter = nCounter + 1
End Sub

Sub ResetCount()
nCounter = 0
End Sub


--
HTH

Bob Phillips

(remove nothere from email address if mailing direct)

"Sdbenn90" wrote in message
...
I need help with either Excel or Visual basic Code to do the following.

I need a command button if clicked by the user it will count the number of
time the button was clicked. Also will need a reset button so the user can
reset the number back to Zero if they need to start over. In Visual basic

I
used the Static function which works but you have to end the form or sub

to
reset the number. Any help with this matter is greatly appreciated.





Bob Phillips

Counter
 
Dim nCounter As Long

Sub Count()
nCounter = nCounter + 1
Worksheets("Sheet1").Range("A1").Value = nCounter
End Sub

Sub ResetCount()
nCounter = 0
End Sub

To assign a button, make sure the Forms toolbar is visible (ToolsCustomize,
click Forms) then drag the commandbutton onto your worksheet, and it will
ask you to assign a macro, select Count.

--
HTH

Bob Phillips

(remove nothere from email address if mailing direct)

"Sdbenn90" wrote in message
...
Thank You for the help, I'm still not sure on how it works. if I want the
numbers to appear in A1. Where in the code do I tell it that A1 is where

this
number to be displayed. if I insert a cmd button in C1, click the button

say
5 time 5 should appear in A1. and I aplogize how do I assign the macro to

the
button.

"Bob Phillips" wrote:

Add this code to a general module and just assign the macros to your
buttons.

Dim nCounter As Long

Sub Count()
nCounter = nCounter + 1
End Sub

Sub ResetCount()
nCounter = 0
End Sub


--
HTH

Bob Phillips

(remove nothere from email address if mailing direct)

"Sdbenn90" wrote in message
...
I need help with either Excel or Visual basic Code to do the

following.

I need a command button if clicked by the user it will count the

number of
time the button was clicked. Also will need a reset button so the user

can
reset the number back to Zero if they need to start over. In Visual

basic
I
used the Static function which works but you have to end the form or

sub
to
reset the number. Any help with this matter is greatly appreciated.







Sdbenn90

Counter
 
Works Great. Thank you so much

"Bob Phillips" wrote:

Dim nCounter As Long

Sub Count()
nCounter = nCounter + 1
Worksheets("Sheet1").Range("A1").Value = nCounter
End Sub

Sub ResetCount()
nCounter = 0
End Sub

To assign a button, make sure the Forms toolbar is visible (ToolsCustomize,
click Forms) then drag the commandbutton onto your worksheet, and it will
ask you to assign a macro, select Count.

--
HTH

Bob Phillips

(remove nothere from email address if mailing direct)

"Sdbenn90" wrote in message
...
Thank You for the help, I'm still not sure on how it works. if I want the
numbers to appear in A1. Where in the code do I tell it that A1 is where

this
number to be displayed. if I insert a cmd button in C1, click the button

say
5 time 5 should appear in A1. and I aplogize how do I assign the macro to

the
button.

"Bob Phillips" wrote:

Add this code to a general module and just assign the macros to your
buttons.

Dim nCounter As Long

Sub Count()
nCounter = nCounter + 1
End Sub

Sub ResetCount()
nCounter = 0
End Sub


--
HTH

Bob Phillips

(remove nothere from email address if mailing direct)

"Sdbenn90" wrote in message
...
I need help with either Excel or Visual basic Code to do the

following.

I need a command button if clicked by the user it will count the

number of
time the button was clicked. Also will need a reset button so the user

can
reset the number back to Zero if they need to start over. In Visual

basic
I
used the Static function which works but you have to end the form or

sub
to
reset the number. Any help with this matter is greatly appreciated.








All times are GMT +1. The time now is 11:36 PM.

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