Как использовать оператор mod в vba (с примерами)


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

Вот два распространенных способа использования этого оператора на практике.

Способ 1: используйте оператор Mod с жестко запрограммированными значениями

 SubUseMod ()
Range(" A1 ") = 20 Mod 6
End Sub

Этот конкретный пример вернет остаток 20, разделенный на 6 в ячейке A1 .

Способ 2. Используйте оператор Mod со ссылками на ячейки.

 SubUseMod ()
Range(" C2 ") = Range(" A2 ") Mod Range(" B2 ")
End Sub

В этом конкретном примере будет вычислен остаток значения в ячейке A2 , разделенный на значение в ячейке B2 , и отобразится результат в ячейке C2 .

Следующие примеры показывают, как использовать каждый метод на практике.

Пример 1. Использование оператора Mod с жестко запрограммированными значениями

Предположим, мы хотим вычислить остаток от 20, разделенного на 6, и отобразить результат в ячейке A1 .

Для этого мы можем создать следующий макрос:

 SubUseMod ()
Range(" A1 ") = 20 Mod 6
End Sub

Когда мы запускаем этот макрос, мы получаем следующий вывод:

Результат 20 раундов Mod 6 равен 2 .

Это значение отображается в ячейке A1 , как мы указали в макросе.

Примечание . Значение «6» входит в число «20» три раза и имеет остаток 2 . Вот как рассчитывается 20 Mod 6.

Пример 2. Использование оператора Mod со ссылками на ячейки

Предположим, мы хотим вычислить остаток значения в ячейке A2 , разделенный на значение в ячейке B2 , и отобразить результат в ячейке C2 .

Для этого мы можем создать следующий макрос:

 SubUseMod ()
Range(" C2 ") = Range(" A2 ") Mod Range(" B2 ")
End Sub

Когда мы запускаем этот макрос, мы получаем следующий вывод:

Результат 20 раундов Mod 6 равен 2 .

Это значение отображается в ячейке C2 , как мы указали в макросе.

Примечание . Полную документацию по операторам VBA Mod можно найти здесь .

Дополнительные ресурсы

В следующих руководствах объясняется, как выполнять другие распространенные задачи в VBA:

VBA: Как добавить значения в диапазон
VBA: Как рассчитать среднее значение диапазона
VBA: как подсчитать количество строк в диапазоне

Добавить комментарий

Ваш адрес email не будет опубликован. Обязательные поля помечены *