Problem with hundredth of seconds
 

Hello.
I use the following code to get an executing time in cell A1 :

HeureDebut = time()
code......
HeureFin = time()
Duree = HeureFin - HeureDebut
Range("A1").value = Duree

I get numbers such as 0.000173611111111138 in standard number format.
If I use hh:mm:ss.00 as a mask, I dont get but zeroes after the seconds :
00:15:00
I use ROUNDED(0.000173611111111138,6) to get 00:15:03.
This doesn't affect the calculations, only the display.
Why cant Excel use the numbers provided by VBA ?
Thanks in advance.
Daniel

Problem with hundredth of seconds
 

Time() returns a number already rounded to seconds.

Try a higher resolution timer via API:


Declare Function timeGetTime Lib "winmm.dll" () As Long

Sub test()
Dim lng As Long

lng = timeGetTime()
Range("A1:IV60000").Value = 1 'example to create delay
lng = timeGetTime() - lng

MsgBox lng & " milliseconds"
End Sub


--
Rob van Gelder - http://www.vangelder.co.nz/excel


"Daniel" wrote in message
...
Hello.
I use the following code to get an executing time in cell A1 :

HeureDebut = time()
code......
HeureFin = time()
Duree = HeureFin - HeureDebut
Range("A1").value = Duree

I get numbers such as 0.000173611111111138 in standard number format.
If I use hh:mm:ss.00 as a mask, I dont get but zeroes after the seconds :
00:15:00
I use ROUNDED(0.000173611111111138,6) to get 00:15:03.
This doesn't affect the calculations, only the display.
Why cant Excel use the numbers provided by VBA ?
Thanks in advance.
Daniel

Problem with hundredth of seconds
 

Thanks, Rob, you made it quite clear.
Daniel
"Rob van Gelder" a écrit dans le
message de news: ...
Time() returns a number already rounded to seconds.

Try a higher resolution timer via API:


Declare Function timeGetTime Lib "winmm.dll" () As Long

Sub test()
Dim lng As Long

lng = timeGetTime()
Range("A1:IV60000").Value = 1 'example to create delay
lng = timeGetTime() - lng

MsgBox lng & " milliseconds"
End Sub


--
Rob van Gelder - http://www.vangelder.co.nz/excel


"Daniel" wrote in message
...
Hello.
I use the following code to get an executing time in cell A1 :

HeureDebut = time()
code......
HeureFin = time()
Duree = HeureFin - HeureDebut
Range("A1").value = Duree

I get numbers such as 0.000173611111111138 in standard number format.
If I use hh:mm:ss.00 as a mask, I dont get but zeroes after the seconds :
00:15:00
I use ROUNDED(0.000173611111111138,6) to get 00:15:03.
This doesn't affect the calculations, only the display.
Why cant Excel use the numbers provided by VBA ?
Thanks in advance.
Daniel

Problem with hundredth of seconds
 

Use the following format:
Dim ztime#
ztime = Val(".000173611111111138")
MsgBox Format(ztime, "hh:mm:ss.ss")

Daniel wrote:
I use the following code to get an executing time in cell A1 :

HeureDebut = time()
code......
HeureFin = time()
Duree = HeureFin - HeureDebut
Range("A1").value = Duree

I get numbers such as 0.000173611111111138 in standard number format.
If I use hh:mm:ss.00 as a mask, I dont get but zeroes after the seconds :
00:15:00
I use ROUNDED(0.000173611111111138,6) to get 00:15:03.
This doesn't affect the calculations, only the display.
Why cant Excel use the numbers provided by VBA ?
Thanks in advance.
Daniel



----== Posted via Newsfeeds.Com - Unlimited-Uncensored-Secure Usenet News==----
http://www.newsfeeds.com The #1 Newsgroup Service in the World! 100,000 Newsgroups
---= East/West-Coast Server Farms - Total Privacy via Encryption =---

Problem with hundredth of seconds
 

My post is BS. Sorry.

Dave wrote:
MsgBox Format(ztime, "hh:mm:ss.ss")



----== Posted via Newsfeeds.Com - Unlimited-Uncensored-Secure Usenet News==----
http://www.newsfeeds.com The #1 Newsgroup Service in the World! 100,000 Newsgroups
---= East/West-Coast Server Farms - Total Privacy via Encryption =---