Как разделить диапазон ячеек на число в Excel?

Иногда возникает необходимость быстро изменить диапазон ячеек в Excel. Например, у вас есть список цен на товары, и вы хотите разделить все значения на 2 — как сделать это максимально эффективно? В этом руководстве представлены пошаговые методы деления диапазона ячеек на число. Давайте подробно разберём каждый из них.

Разделите диапазон ячеек на число с помощью функции Вставить специально

Быстро разделите диапазон ячеек на число с помощью Kutools для Excel

Разделите диапазон ячеек на число с помощью кода VBA

Разделите диапазон ячеек на число с помощью функции Вставить специально

Например, я хочу разделить все ячейки на число 15. С помощью функции Excel «Вставить специально» вы легко справитесь с этой задачей, выполнив следующие шаги:

1. Вставьте делитель (например, 15) в пустую ячейку и скопируйте его.

2. Выделите диапазон, в котором требуется разделить все числа на 15, щёлкните по нему правой кнопкой мыши и выберите в меню пункт «Вставить специально».

3. В диалоговом окне «Вставить специально» выберите в разделе «Вставить» опцию «Все».

4. Удалите ранее введённое число 15.

Теперь диапазон ячеек разделён на 15. См. снимок экрана:

Быстро разделите диапазон ячеек на число с помощью Kutools для Excel

Если метод «Вставить специально» кажется вам сложным, существует ли более простой и быстрый способ выполнить эту задачу? Да! Функция «Операция» из Kutools для Excel позволяет разделить диапазон ячеек на число всего за несколько секунд!

1. Выделите диапазон с числами, которые необходимо разделить на заданное число, затем выберите «Kutools» > «Дополнительно» > «Операция». См. снимок экрана:

3. В диалоговом окне «Математический инструмент» выберите «Division» в поле «Operation», введите делитель (например, «15») в поле «Operand». Результат отобразится на панели «Preview». Завершите операцию, нажав кнопку «OK» или «Apply». См. снимок экрана:

Разделите диапазон ячеек на число с помощью кода VBA

С помощью кода VBA вы можете автоматически разделить диапазон ячеек на заданное число.

1. Выделите диапазон, который нужно разделить на число.

2. Нажмите «Developer» > «Visual Basic». Откроется окно «Microsoft Visual Basic for Applications». Выберите «Insert» > «Module» и вставьте в модуль следующий код:

VBA: Разделить диапазон ячеек на число

Sub DivisionNum()
'Updateby20140128
Dim Rng As Range
Dim WorkRng As Range
Dim xNum As Integer
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
xNum = Application.InputBox("Division num", xTitleId, Type:=1)
For Each Rng In WorkRng
    Rng.Value = Rng.Value / xNum
Next
End Sub

3. Затем нажмите кнопку, чтобы выполнить код. Во всплывающем диалоговом окне выберите диапазон с числами, которые нужно разделить на определённое число, и нажмите кнопку OK. См. снимок экрана:

4. Во втором всплывающем диалоговом окне введите делитель и нажмите кнопку «OK». См. снимок экрана:

Теперь все числа в выбранном диапазоне разделены на 15.

Демонстрация: быстро разделите диапазон ячеек на число с помощью Kutools для Excel

Связанные статьи