Solved

Excel 2010:  Macro Button Stop Watch

Posted on 2013-06-17
7
1,348 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
Independent Software Vendors: We Want Your Opinion

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

 
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: Postgres Monitoring System

A PHP and Perl based system to collect and display usage statistics from PostgreSQL databases.

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

Outlook Free & Paid Tools
Access developers frequently have requirements to interact with Excel (import from or output to) in their applications.  You might be able to accomplish this with the TransferSpreadsheet and OutputTo methods, but in this series of articles I will di…
Learn how to make your own table of contents in Microsoft Word using paragraph styles and the automatic table of contents tool. We'll be using the paragraph styles in Word’s Home toolbar to help you create a table of contents. Type out your initial …
Many functions in Excel can make decisions. The most simple of these is the IF function: it returns a value depending on whether a condition you describe is true or false. Once you get the hang of using the IF function, you will find it easier to us…

749 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