Страницы: 1
RSS
Разделение числа на разряды пробелами, Необходимо разделить числа на разряды пробелами
 
Добрый день.
Имеется подобная функция:
Она разделяет получаемые значения (числа) на разряды пробелами, учитывая также десятичные числа.
То есть вывод при получении числа 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
Изменено: willturner - 07.12.2023 09:50:47
 
А формат ячейки - Числовой с разделителем групп разрядов не подходит?
Согласие есть продукт при полном непротивлении сторон.

Контакты, благодарности
Страницы: 1
Наверх