CDbl(Num|$)
Conversion
Convert to a double precision real.
Sub Main Debug.Print CDbl("1E6") ' 1000000 End Sub