Как это сделать расчет в VBA в Microsoft Excel 2010
В этой статье вы узнаете, как выполнять вычисления в Excel с помощью кода VBA.
[.underline] # Давайте разберемся на примере: # У нас есть несколько случайных чисел, которые мы хотим умножить, а затем сложить с некоторыми числами для каждой ячейки.
Если вам необходимо произвести расчет для выбранных ячеек, вам необходимо выполнить следующие шаги:
Щелкните вкладку «Разработчик». В группе «Код» выберите Visual Basic
Нажмите «Вставить», а затем «Модуль»
Это создаст новый модуль.
Введите следующий код в модуль
Подсчет ()
x = InputBox («Умножить на что?», по умолчанию: = 1)
y = InputBox («Что добавить?», по умолчанию: = 0)
===
Для каждой выделенной ячейки
cell.Value = cell.Value * x + y
Следующая ячейка
End Sub
Нажмите сочетание клавиш ALT + F8, чтобы открыть окно макроса, а затем выберите макрос.
Кроме того, вы можете нажать F5, чтобы запустить код на экране VBA.
После выполнения макроса мы получим следующее поле ввода для ввода числа «Умножить на что»
После ввода значения (2 в нашем примере) перед вами появится следующее поле ввода, чтобы ввести число, которое нужно добавить (2 в нашем примере).
См. Ниже снимок
Мы получим результат. См. Ниже снимок
Таким образом, мы можем производить расчеты в соответствии с требованиями пользователя.