Excel formatting incorrectly

[jjoy123123]

I'm trying to pass the value of varValue over to Excel. varValue is equal to 0.015 but Excel is reading it as 0.0149999996647239. The cell I'm populating in Excel is formatted as Number with 2 decimal places. Instead of showing .02, it is showing .01. Why is that?

Private Sub PopulateExcel(varValue As Variant)
oRange.Cells(1,2) = varValue
End Sub

 

[AndyWatt]

Try:

oRange.Cells(1,2) = Format(varValue, "0.00")


Andy
"Logic is invincible because in order to combat logic it is necessary to use logic." -- Pierre Boutroux
"A computer program does what you tell it to do, not what you want it to do." -- Greer's Third Law

 

[SkipVought]

andy,

Declare your varValue as Double. It's probably declared as Single and does not have enough precision.



Skip,

http://www.TheOfficeExperts.com

Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884

 

[AndyWatt]

Or, of course, use a Currency.

Andy
"Logic is invincible because in order to combat logic it is necessary to use logic." -- Pierre Boutroux
"A computer program does what you tell it to do, not what you want it to do." -- Greer's Third Law