Use a rounding function. Vba does go a little crazy w/ doubles.
And you sometimes don't know if the number is the actual number or just the print out of the number at that time.
Two computers with different processors, graphic cards can give different numbers for the same value.
Sub ro()
Debug.Print RoundOff(3.93700787401574E-02, 2)
End Sub
Public Function RoundOff(dblNumber As Double, btPlaces As Byte) As Double
Dim lngHolder As Long
lngHolder = 10 ^ btPlaces
RoundOff = Int((dblNumber * lngHolder) + 0.5) / lngHolder
End Function
EDIT: Wrapped that code in the code wrapper for ya