Домашняя страница Undo Do Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Справочники

МЕНЮ САЙТА
  • 1
  • 2
  • 3

КАТЕГОРИИ РАЗДЕЛА

ОПРОСЫ
Какой версией Excel Вы пользуетесь?
Всего ответов: 57437
Главная » Справочники » Функции VBA » Математические функции

Round

Функция Round


Round(Number [,NumDigitAfterDecimal])

Функция появилась в Visual Basic 6.0


Функция Round служит для округления чисел до заданной точности (число значащих цифр в дробной части)
Функция Round(Number,2) эквивалентна функции Format(Number,"#.##")


Возвращаемое значение

В результате действия функции возвращается округленное число, тип которого совпадает с типом переданного аргумента


Параметры
NumberОбязательный аргумент может представлять любое допустимое числовое выражение
NumDigitAfterDecimalНеобязательный аргумент, представляющий собой целое положительное число, указывающее, сколько знаков следует оставить после запятой. Если аргумент опущен, то дробная часть отбрасывается

Пример

Dim A,retval
A=123.456789
retval=Round(A) 'возвращается 123
retval=Round(A,3) 'возвращается 123.457

Категория
Математические функции

Счетчики: 29898 | Добавил: Serge_007
Всего комментариев: 4
0   Спам
1    Невилл   (13.06.2017 16:57) [ Материал]
   Небольшая неточность в статье обнаружил. Можете, глянуть, пожалуйста?

"Функция Round(Number,2) эквивалентна функции Format(Number,"#.##")"
Не эквивалентна, увы: Round(2.545, 2) = 2, 54 ; Format(2.545, "#.##") = 2,55
В Round(VBA) используется "банкирское" округление, не арифметическое.
Думаю, стоит уточнить все описание функции. И отдельно отметить, что Round(Excel) и Round(VBA) отличаются.

0   Спам
2    Dave_Murey   (26.12.2017 15:40) [ Материал]
   А куда делась функция Truncate - усечение дробного числа без округления?
Она очень необходима, но её нет!

0  
3    Pelena   (26.12.2017 16:13) [ Материал]
   В VBA есть аналогичная функция Fix

0   Спам
4    ВладимирG   (26.12.2017 16:18) [ Материал]
   Dim a As Double
a = Application.WorksheetFunction.Floor("1234,75357", 0.01)
Debug.Print a

Добавлять комментарии могут только зарегистрированные пользователи.
[ Регистрация | Вход ]
Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!