Solved

Excel 2010:  Macro Button Stop Watch

Posted on 2013-06-17
7
1,363 Views
Last Modified: 2013-06-20
Curious if someone has a stop watch macro that I can use.  I'd like to track how much time worked on each event on my spreadsheet.  If I had a macro button I could embed on each row, I could click on each button in each row to do this.  I could click on this button before I begin, then click on the button when finished.  It would then populate the total time worked in column L of my spreadsheet in each cell.  If it could compute a running total of timed worked that would be awesome too.  Thank you for your help.
0
Comment
Question by:itsmevic
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 4
  • 3
7 Comments
 

Author Comment

by:itsmevic
ID: 39254739
i think i found a macro that works just need to enter proper syntax for entire L column range.  Any help is appreciated.  Thanks.

Private Sub TickTock()
Range ("L2").Value = Format (Time - t, "hh:mm:ss")
NextTick = Now + TimeValue ("00:00:01")
Application.OnTime NextTick, "TickTock"
End Sub
0
 
LVL 43

Expert Comment

by:Saqib Husain, Syed
ID: 39254755
What do you mean by entire L column? Can you give an example?
0
 

Author Comment

by:itsmevic
ID: 39254782
Here is a screenshot of the spreadsheet and button set-up.  Hopefully this will help.
20130617-174458515382038.jpg
0
Online Training Solution

Drastically shorten your training time with WalkMe's advanced online training solution that Guides your trainees to action. Forget about retraining and skyrocket knowledge retention rates.

 
LVL 43

Accepted Solution

by:
Saqib Husain, Syed earned 500 total points
ID: 39254807
Can  you consider having one set of buttons and select the desired cell? In this case your macro could be

Private Sub TickTock()
selection.Value = Format (Time - t, "hh:mm:ss")
NextTick = Now + TimeValue ("00:00:01")
Application.OnTime NextTick, "TickTock"
End Sub
0
 
LVL 43

Expert Comment

by:Saqib Husain, Syed
ID: 39255224
Please upload your excel file so that we can continue from there. Fake the values if needed.
0
 

Author Comment

by:itsmevic
ID: 39256638
the module you provided was nice, however it doesnt track total time.  i.e. It doesnt start from 00:00:01 and count up.  Being able to click on the cell to start and stop is nice, the only problem with the current module is that it doesnt matter where you click on the worksheet it will embed a clock and not a timer.  I need a timer that can be stopped and started via a button or buttons (start and stop button) or stopped and started with a double-click and limit to one columns entire range if need be.  Hope that makes sense.
0
 

Author Comment

by:itsmevic
ID: 39258384
Here is a sample file...
Example.xlsx
0

Featured Post

Free Tool: SSL Checker

Scans your site and returns information about your SSL implementation and certificate. Helpful for debugging and validating your SSL configuration.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

My experience with Windows 10 over a one year period and suggestions for smooth operation
I was prompted to write this article after the recent World-Wide Ransomware outbreak. For years now, System Administrators around the world have used the excuse of "Waiting a Bit" before applying Security Patch Updates. This type of reasoning to me …
This Micro Tutorial will demonstrate how to use longer labels with horizontal bar charts instead of the vertical column chart.
Access reports are powerful and flexible. Learn how to create a query and then a grouped report using the wizard. Modify the report design after the wizard is done to make it look better. There will be another video to explain how to put the final p…

751 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question