Добавить числа к существующему содержимому ячеек с помощью макроса VBA

Содержание

Считайте все числа из желаемого диапазона ячеек с помощью макроса и добавьте число к содержимому

Часто бывает необходимо добавить отметку к ячейкам в списке. Для этого необходимо добавить фиксированное значение ко всем константам в диапазоне ячеек.

Формулы изменять нельзя. Макрос решает эту задачу и добавляет число по вашему выбору ко всем константам в отмеченной области данных.

Таким образом, вы можете, например, быстро и эффективно адаптировать цены и т.п. к новым условиям.

На следующем рисунке показана таблица, которую необходимо изменить. В ячейках B1 и B2 есть константы, а в ячейках B3 и B4 - формулы. Две ячейки формулы относятся к ячейкам с постоянными значениями.

Чтобы добавить цифру 10 ко всем константам в этом списке, сначала отметьте область данных B1: B4, а затем вызовите следующий макрос:

Добавить подконстанту ()
Тусклая ячейка как диапазон
Коэффициент затемнения до тех пор, пока
Дополнительная сумма = 10
Для каждой выделенной ячейки
С ячейкой
Если нет (.HasFormula), то .Value = .Value + дополнительная сумма
Конец с
Следующая ячейка
Конец подписки

После запуска макроса дополнительная сумма 10 добавляется ко всем постоянным ячейкам в отмеченной области ячеек. На следующем рисунке показан результат:

Макрос использует коэффициент, который вы определили при присвоении значения переменной «Дополнительная сумма».

Чтобы ввести макрос, нажмите ALT F11 в Excel, чтобы открыть редактор VBA. Используйте команду ВСТАВИТЬ - МОДУЛЬ, чтобы вставить пустой лист модуля. Чтобы запустить макрос прямо из Excel, используйте комбинацию клавиш ALT F8.

Вы поможете развитию сайта, поделившись страницей с друзьями

wave wave wave wave wave