Добрый день. Имеется подобная функция: Она разделяет получаемые значения (числа) на разряды пробелами, учитывая также десятичные числа. То есть вывод при получении числа 1100000 будет 1 100 000,00 Но при получении функцией числа 1000 или 50000, 150000 и подобных выводятся соответственно значения: 1000,00, 50000,00, 150000,00 (необходимо же 1 000,00, 50 000,00, 150 000,00) Подскажите каким образом изменить функцию для корректного вывода значений.
Код
Function SummaRazd(Num, Optional Delim = "") As String
SummaRazd = IIf(Num < 0, "-", "") & Replace$(Trim$(Format$(Abs(Num), Right("### ### ### ### ### ### ### ### ### ###,##0.00", Len(Abs(Num)) + (Len(Abs(Num)) - 1) \ 3))), " ", Delim)
End Function