Run-time error 6: OverFlow

[mfaqueiroz]

Hi

I have one calculated field TimeMS:CDbl([date])*86400000+[ms] --> is to convert the date to miliseconds

So I have defined as
Dim TimeMs as Long
....
(code)
....
TimeMS = CLng(Tab1.Fields(9).Value)
..

And appears the error 6(overflow), do you know how can i solve that?

Thank you

I wish a good week for everyone!

 

[RuralGuy]

Try:
Dim TimeMs as Double

 

[arnelgp]

CDbl([date]*86400000)+[ms]