How Fast Is Your System?
Just for fun, take a few minutes and post your result. Copy and paste this procedure into a VBA module. Then run it, and post the time it takes.
Sub TimeTest()
'100 million random numbers, tests, and math operations
Dim x As Long
Dim StartTime As Single
Dim i As Long
x = 0
StartTime = Timer
For i = 1 To 100000000
If Rnd <= 0.5 Then x = x + 1 Else x = x - 1
Next i
MsgBox Timer - StartTime & " seconds"
End Sub
Here's the time on my system (no significant difference between Excel 2003, 2007, and 2010 Tech Preview):
My system is about three years old. I'm just curious about the range of processor speed of systems in use. Is it possible to run this in less than a second?
Spreadsheet Page Blog
Welcome to the Spreadsheet Page Blog. This is where you find the latest news on my books, add-ins, and other Excel-related topics. Comments are welcome.
All Topics
Filter by Category
Subscribe
Recent Comments
Other Blogs
2