I found that using Round() helped:
Sub num_test() Dim num As Double num = 5.92427068015303E-10 Debug.Print num num = Round(num, 11) Debug.Print num End Sub