Public Sub test()
Cells(1, 3).Value = Format(Cells(1, 1).Value - _
Cells(1, 2).Value * 0.000001,"#0.0000000")
End Sub

It is due to the fact that all decimal numbers can not be represented
exactly using binary. Just like 1/3 can't be exactly represented using
Decimal numbers.

--
Regards,
Tom Ogilvy

"Adrian" wrote in message
...
When I run the following code:

Public Sub test()
Cells(1, 3).Value = Cells(1, 1).Value - Cells(1,
2).Value * 0.000001
End Sub


with input data:
A1=0.035
A2=35000

I expect to get A3=0; however I get A3 = 6.94E-18!

Can anyone explain why and how this can be avoided?

Thank you in advance for your help,

Adrian F.
Ottawa