Николай, когда то давно в 28.08.2013 году я писал о неработоспособности данной функции. В то время просто проверял как все работает, функция была не нужна и благополучно забыта. Сегодня мне это, как ни кстати, очень понадобилось. Функция выдает 0 по всем значениям. Возможно это связано с региональными настройками, настройками браузера... Полез в код. Ноль идет по этому куску
Код
CBR = CDbl(outstr)
Переменная outstr, у меня, в текстовом формате, разделитель запятая. Я это поправил маленьким костылем.