Проблема с нахождением максимума с помощью Excel-функции.

[Дятел]

Словил "клин" в простой ситуации, в поиске не нашел подобного.
Помогите советом начинающему, плз!
Имеем в редакторе VBA(Excel) что-то типа:

Sub R()
Dim x5 As Single, x14 As Single, x15 As Single, x23 As Single
x15 = 17.48
x14 = 17.4
x23 = 17.4
x5 = 34.88
If x5 <> Application.WorksheetFunction.Max(x 15, x23) + x14 Then
MsgBox ("Ошибка")
End If
End Sub

условие не желает выполняться, хотя вроде все очевидно. Есть предположение, что с форматом чисел надо колдовать, но как?

[mchip]

x5=34.88
Max(x15, x23) + x14 =34,8799991607666

а это разные вещи

[slan]

как нас учили - при операциях с вещественными числами не может быть сравнений типа = или <> , может быть только определение точности результата, т.е > dx или <dx, где dx - точность (например, 0,0001 для вашего случая)

[Дятел]

Числовые значения переменных привел для минимизации кода. В реальности функция работает со ссылками на значения в ячейках. Причем более "тяжелые" , на мой взгяд, для понимания VBA экселевские функции (например VLookup) отрабатывают вполне корректно. "Странность" поведения замечена именно на МАХ! Неужели нет более изящного решения, или это неисправимая ошибка редактора?
P.S. Конечно, можно применить Round, но хотелось бы понять, почему VBA в операциях сравнения "корёжит" сами значения, он что, конвертирует в понятный для себя вид дроби туда-сюда?