Simple Timer

[atmospheric]

Is it possible using formulae to create a simple count up timer along the lines (In A1) =B1+1 and in (B1) =A1+1 ? Obviously this will create a circular reference and get kicked out by Excel.

I would prefer to use a formula if possible, but if it's not, could one of you guys post the necessary code? Speed and accuracy don't matter.

This is to serve no other purpose than to run the b*ll*cks off my old pc to see how much it can handle.

Thanks in advance

 

[just_jon]

Don't think you can do it via formula as the # of iterations is limited.

Don't really know how to do it, other than put in a bunch of formulas which reference each other then have a looping code .Calculate

 

[atmospheric]

OK, very unusual not to get an solution so back to the Search Facility.

The following link provides a countdown timer which does the job perfectly and runs my processor at 100%

http://www.mrexcel.com/board2/viewtopic.php?t=149712&highlight=timer

Might be useful for anyone wanting to bench test a PC

 

[Datsmart]

If all you are looking for is the time it takes to run a procedure, the following will get you elapsed time.

Put this at the beginning of your procedure.
Start = Timer

code goes here...

Then at the end of your macro, put this.

Sheets("Sheet1").Range("D1").value = Timer - Start

Cell D1 will have the number of seconds it took to run the Macro.

 

[NateO]

Hello,

If you want to stomp on your processor with no boundaries, try the following:

Sub foobar()
Do:   DoEvents:   Loop
End Sub

Hit Ctrl-Break when you're done.