Originariamente inviato da frank095
si ho corretto menttendo al posto di CInt Clng
ma se hai fatto

Dim valore As Double

dovresti usare CDbl!