Как округлить диапазон чисел до четности в Excel?
Что такое округление до даже в Excel? Округление до четного также называется банковским округлением, в основном это похоже на обычное округление, за исключением случаев, когда округляемое число - это число 5. Если цифра перед 5 нечетная, вам следует округлить в большую сторону, а если цифра перед 5 равна даже следует округлить в меньшую сторону.
Например, 23.345 округлить до четности в процентиле будет 23.34.. и 12.335 округлить до четности в процентиле будет 12.34..
В этой статье я расскажу о том, как сделать банковское округление в Excel.
Округление чисел до четного с помощью функции, определяемой пользователем
Округление чисел до четного с кодом VBA
Круглые числа даже с Kutools for Excel
Округление чисел до четного с помощью функции, определяемой пользователем
Вы можете использовать следующую определенную функцию для округления чисел до четности в Excel. Пожалуйста, сделайте следующее:
1. Выберите числа, которые нужно округлить до четного.
2. Затем удерживайте ALT + F11 ключи, и он открывает Microsoft Visual Basic для приложений окно.
3. Нажмите Вставить > Модулии вставьте следующий макрос в окно модуля.
Функция BankersRound (число, точность)
BankersRound = Round (число; точность)
End Function
4. Сохраните код и введите формулу = bankersround (a1,2) в соседнюю пустую ячейку. Смотрите скриншот:
5, Затем нажмите Enter ключ. И выберите ячейку B1, затем перетащите маркер заполнения в диапазон, который вы хотите содержать эту формулу. Смотрите скриншот:
Округление чисел до четного с кодом VBA
Если вы не хотите использовать определенную функцию, следующий код VBA также может вам помочь. Сделайте так:
1. Выберите диапазон, который нужно округлить до четного.
2. Затем удерживайте ALT + F11 ключи, и он открывает Microsoft Visual Basic для приложений окно.
3. Нажмите Вставить > Модулии вставьте следующий код в МодулиОкно.
Sub RoundToEven()
'Update 20131107
Dim rng As Range
Dim WorkRng As Range
Dim intNumberOfDecimal As Integer
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
intNumberOfDecimal = Application.InputBox("NumberOfDecimal", xTitleId, Type:=1)
Set WorkRng = WorkRng.SpecialCells(xlCellTypeConstants, xlNumbers)
For Each rng In WorkRng
rng.Value = Round(rng.Value, intNumberOfDecimal)
Next
End Sub4, Затем нажмите F5 Чтобы запустить этот код, введите в поле подсказки количество десятичных знаков, которое нужно округлить. Смотрите скриншот:
5. Затем нажмите OK, все выбранные числа округлены до четного. Смотрите скриншоты:
 |
 |
 |
Круглые числа даже с Kutools for Excel
Ни пользовательская функция, ни код VBA не кажутся вам такими сложными, я могу представить вам простой способ их решения. С участием Раунд без формулы of Kutools for Excel, вы можете быстро округлить диапазон чисел до четного.
Kutools for Excel включает более 300 удобных инструментов Excel. Бесплатная пробная версия без ограничений в течение 30 дней. Получить сейчас.
После установки Kutools for Excel вы можете сделать следующее:
1. Выделите диапазон, который нужно округлить до четного.
2. Нажмите Кутулс > Круглые, см. снимок экрана:
3. В Раунд без формулы в диалоговом окне введите нужный десятичный разряд, а затем выберите Округлить до четного под Опция, и вы можете предварительно просмотреть результат из Панель предварительного просмотра. Смотрите скриншот:
4. Затем нажмите OK or Применить, все числа будут округлены до двух знаков после запятой.
Щелкните «Округлить до четности», чтобы узнать больше об этой функции.
Связанная статья:
Округление / округление вверх / вниз диапазона номеров ячеек в Excel
Лучшие инструменты для офисной работы
Улучшите свои навыки работы с Excel с помощью Kutools for Excel и почувствуйте эффективность, как никогда раньше. Kutools for Excel предлагает более 300 расширенных функций для повышения производительности и экономии времени. Нажмите здесь, чтобы получить функцию, которая вам нужна больше всего...
Вкладка Office: интерфейс с вкладками в Office и упрощение работы
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!
