WorksheetFunction.AveDev

[Alla_s]

Доброго времени суток!

Пытаюсь подсчитать Average Deviation, но сравнивая значения просчитанныe по стандартной функции AveDev, в VBA коде функция AveDev считает не правильно.

Koд:
.Cells(i, 26) = WorksheetFunction.AveDev(Range("U2: X2"), Range("U3:X3"), Range("U4:X4"), Range("U5:X5"), Range("U6:X6"), Range("U7:X7"), Range("U8:X8"), Range("U9:X9"), Range("U10:X10"), Range("U11:X11"), Range("U12:X12"),Range("U13:X13"), Range("U14:X14"), Range("U15:X15"), Range("U16:X16"))

Для примера на Sheet 15 показана разница между значениями. В чем причина? Подскажите, пожалуйста, как исправить проблему.

Для запуска прогаммы в листе "to get to 10m" виделите диапазон "А1:B151", "step" введите 10

[Alla_s]

Доброго всем вечера,

Я немного в растеренности. Может я не правильно создала тему? Или действительно просто никто не поможет помочь?