Округление чисел, чтобы заканчивались на 90

Страница 1 из 1 1
Модератор форума: китин, _Boroda_, DrMini

Округление чисел, чтобы заканчивались на 90 (Формулы/Formulas)

Mikhail21

Дата: Вторник, 23.01.2018, 16:59 | Сообщение № 1

Группа: Пользователи

Ранг: Прохожий

Сообщений: 1

Репутация: 0 ±

Замечаний: 0% ±

Excel 2016

Здравствуйте! Прошу переместить тему в заданный раздел, если она находится не на месте.
Имеется следующий вопрос: как можно сделать округление числа, допустим, 7382 округлить до 7290 или до 7390. Или, если такое возможно, чтобы числа которые оканчиваются меньше 50 округлялось до меньшего числа, а которые больше 50 до большего. Например, 7349 и меньше округлялось до 7290, а 7350 и выше до 7390.
Заранее спасибо!!

Ответить

Che79

Дата: Вторник, 23.01.2018, 17:11 | Сообщение № 2

Группа: Друзья

Ранг: Старожил

Сообщений: 1649

Репутация: 306 ±

Замечаний: 0% ±

2013 Win, 365 Mac

Mikhail21, добрый день. Прочтите тут, поправьте название темы, а, затем, прочтите тут.

Делай нормально и будет нормально!

Ответить

Vinos

Дата: Среда, 24.01.2018, 10:25 | Сообщение № 3

Группа: Пользователи

Ранг: Прохожий

Сообщений: 1

Репутация: 0 ±

Замечаний: 0% ±

Excel 2016

По идее должно подойти вод Ваши запросы!!!
Протестируйте!!!

Function round90(ByVal number As Long) As Long
    remainder = number Mod 100
    difference = number - remainder
    If (remainder >= 50) Then
        round90 = difference + 90
    Else
        round90 = difference - 10
    End If
End Function