strange result of values comparing

Hello, guys!
Hope there is anybody who can help me. It seems that there is something wrong either with my sanity or with excel…
I have attached the file. See, we have range B1 with formula =A1*0.65, result that we see in B1 is OK. Then in VBA module we take value from A1 and multiply it by 65/100 (result in variable y). Display result by debug.print. The result is OK, it equals B1, right as we could expect. After that we compare value B1 with y and we get result – they are not equal?
Data type for calculation in module is double, right as Excel itself uses in worksheets formulas. Mode "PrecisionAsDisplayed" is off.
What is going on?
Many thanks in advance for your advice.