Добрый день! Подскажите, почему формула ROUND при расчете в коде VBA округляет неверно? И как это исправить? Прилагаю файл с расчетом с помощью кода и с помощью формулы.
| Код |
|---|
Function formula(arg, minvp, minoc, normvp, normoc, maxvp, maxoc As Variant) As Variant If (arg > normvp) And (arg <= maxvp) Then formula = Round(normoc + ((arg - normvp) / (maxvp - normvp) * (maxoc - normoc)), 2) End Function |
