VBA Timer oveflow

[J.Ty.]

I am using VBA Timer function to measure time of various Excel computations, in the spirit of

        t = Timer
           Worksheets("Example").Calculate
        s = Timer
        elapsed = s - t

However, when it comes to measuring periods of the order of many hours, it overflows and recently I've got negative values of 'elapsed'. Does anybody know the size of the numbers Timer uses, and how to recover the true time from the negative one?

J.Ty.

 

[mole999]

what made it negative, any idea of the length of time that may have been involved

could s have been re-declared by another routine

 

[pgc01]

Hi

How did you declare s and t?

Notice from the help:

Returns a Single representing the number of seconds elapsed since midnight.

Does your period include midnight?

 

[AlphaFrog]

I am using VBA Timer function to measure time of various Excel computations, in the spirit of

        t = Timer
           Worksheets("Example").Calculate
        s = Timer
        elapsed = s - t

However, when it comes to measuring periods of the order of many hours, it overflows and recently I've got negative values of 'elapsed'. Does anybody know the size of the numbers Timer uses, and how to recover the true time from the negative one?

J.Ty.

Timer returns a Single representing the number of seconds elapsed since midnight.

If your calculations elapsed over midnight, then s will be smaller than t

This will add a day (86400 seconds) to s if it's less than t

        t = Timer
           Worksheets("Example").Calculate
        s = Timer
       If s < t then s = s + 86400
        elapsed = s - t

 

[J.Ty.]

Hi

How did you declare s and t?

Notice from the help:



Does your period include midnight?

Bingo! Midnight was in the middle (the computation should have taken around 11 hours and started late in the afternoon).

Thanks!

J.Ty.

 

[pgc01]

I'm glad it helped. Cheers!