Not sure why assigning cell data with .value unexpectedly rounds number

[jardenp]

Here's the line

ImportWS.Cells(ImportAddRow, ImpRate) = SourceWS.Cells(r, MilR).Value

SourceWS.Cells(r,MilR) actual value is $.445 formatted as currency. The value that gets written into ImportWS.Cells(ImportAddRow, ImpRate) is $.45. Why does this round to 2 decimal places?

When I MsgBox SourceWS.Cells(r, MilR).Value is shows $.445, not the rounded number.

I adjusted the code to

ImportWS.Cells(ImportAddRow, ImpRate) = SourceWS.Cells(r, MilR)

and it works, so this question is more for educational purposes.

Thanks in advance!

Josh

 

[CSmith]

AFAIK what you're seeing is the standard currency rounded to 2 places, but removing the .Value stores not only the value but the larger decimal places currency format from the SourceWS.Cells(r, MilR).

 

[jardenp]

AFAIK what you're seeing is the standard currency rounded to 2 places, but removing the .Value stores not only the value but the larger decimal places currency format from the SourceWS.Cells(r, MilR).

Thanks for the reply. That's what I thought.

 

[CSmith]

Thanks for updating us! Glad to help