VBA Mod не з'яўляецца функцыяй, тады як MOD з'яўляецца функцыяй у аркушы Excel. VBA Mod - гэта аператар, які дзеліць два лікі і вяртае астатак . Аператар Mod - гэта кароткая форма MODULO , якая выкарыстоўваецца ў матэматычных аперацыях. Аператары Mod акругляюць з плаваючай кропкай .

У гэтым артыкуле я пакажу вам розныя прыклады выкарыстання аператара Excel VBA Mod .

Спампаваць для практыкі

Асновы VBA Mod Function: Рэзюмэ & Сінтаксіс

Зводка

Аператар VBA Mod дзеліць два лікі і вяртае астатак . Там, дзе адзін вядомы як дзельнік , другі з'яўляецца лікам . Аператар Mod дзеліць лік на дзельнік .

Сінтаксіс

Number1 Mod Number2 (Divisor)

Аргументы

Вяртанае значэнне

Аператар VBA Mod вяртае рэшту .

Версія

Аператар VBA Mod даступны для Excel 2000 і пазнейшых версій.

Я выкарыстоўваю Excel Microsoft 365 длятлумачыцца ў раздзеле 1.

➤ Я назваў кнопку Цотны або Няцотны .

Пасля гэтага націсніце кнопку Кнопка , каб запусціць VBA код.

Такім чынам, вы даведаецеся, якое значэнне з'яўляецца цотным , а якое няцотным .

Тут, 1 гэта няцотны лік.

Тут 2 гэта цотны лік.

Больш падрабязна: Аператар VBA If – Then – Else у Excel (4 прыклады)

9. Выкарыстанне дыяпазону ячэек у VBA Mod для атрымання рэшты

Вы таксама можаце выкарыстоўваць дыяпазон ячэек , каб атрымаць рэшту з дапамогай VBA Mod .

Каб адкрыць VBA рэдактар, выканайце дзеянні, апісаныя ў раздзеле 1.

Затым увядзіце наступны код у Модуль .

5702

Тут, у падпрацэдуры Get_Reminder_UsingVBA, я аб'явіў зменную n як Цэлы лік .

Затым я выкарыстаў цыкл For , дзе я захаваў значэнне, якое я аб'явіў праз спасылку на ячэйку. Цыкл будзе працаваць для значэнняў з радкоў 4 да 9 .

Затым выкарыстоўвалі MsgBox , каб паказаць астатак .

Цяпер Захавайце код і вярніцеся да працоўнага ліста.

Каб уставіць Кнопку , выканайце крокі, апісаныя ў раздзеле 1 .

➤ Я назваў кнопку Dynamic Cell Reference .

Пасля гэтага націсніце кнопку Button , каб запусціць VBA код.

Такім чынам, вы атрымаеце астатак для ўсіх выкарыстаных значэнняў адзінна адзін.

Першы для ліку 29 дзе дзельнік роўны 3 .

Другі - для лічбы -47 дзе дзельнік роўны 5 .

Цыкл будзе працаваць, пакуль не дасягне радка 9 . Пяты - для ліку 59 дзе дзельнік роўны 6 .

Звязаны змест: Як выкарыстоўваць функцыю рандомізацыі VBA ў Excel (5 прыкладаў)

Розніца паміж Excel MOD & VBA Mod

Хоць у большасці выпадкаў значэнні, якія вяртаюцца для функцыі MOD і аператара VBA Mod , у некаторых выпадках вынік адрозніваецца адзін ад аднаго. Дазвольце мне паказаць вам розніцу паміж імі.

Пра што трэба памятаць

🔺 Аператар акругляе дзесятковыя/плываючыя кропкі.

Практычны раздзел

Я даў практычны аркуш у сшытку, каб адпрацаваць гэтыя растлумачаныя прыклады.

Выснова

У гэтым артыкуле я паказаў 9 прыкладаў аператара Excel VBA Mod . Я таксама паспрабаваў ахапіць прычыны частага паказу памылак. Разам з рэчамі, якія вам трэба будзе памятаць пры выкарыстанні аператара. Не саромейцеся пакідаць каментарыі ніжэй для любых тыпаў запытаў і прапаноў.

9 прыкладаў выкарыстання функцыі VBA Mod у Excel

1. Выкарыстанне VBA Mod для атрымання астатку

Калі вы хочаце, вы можаце атрымаць рэшткі з дапамогай аператара VBA Mod .

Дазвольце мне растлумачыць вам працэдуру,

Для пачатку адкрыйце Распрацоўшчык табуляцыя >> абярыце Visual Basic .

➤ Цяпер з'явіцца новае акно Microsoft Visual Basic для прыкладанняў .

Далей з Уставіць >> абярыце Модуль

Цяпер увядзіце наступны код у Модуль .

8434

Тут, у падпрацэдуры Get_Reminder , я аб'явіў зменную n як Integer і выкарыстаў яе для захавання вяртанага значэння Mod аператар.

Затым выкарыстоўвалі MsgBox , каб паказаць астатак .

Цяпер, Захаваць код і вярніцеся да працоўнага ліста.

Зноў адкрыйце ўкладку Распрацоўшчык >> з Уставіць >> выберыце Кнопку з Элементаў кіравання формай

Цяпер Перацягніце Кнопку ў змясціце яго там, дзе вы хочаце даць подпіс.

Далей вы можаце даць назву кнопцы.

➤ Я назваў яе Атрымаць напамін .

⏩ Зараз, пстрыкніце правай кнопкай мышы з'явіцца кантэкстнае меню Прызначыць Макрас .

Адтуль выберыце Прызначыць макрас .

⏩ З'явіцца дыялогавае акно Прызначыць макрас .

Тады,выберыце Назва макраса і Макрасы ў .

⏩ Я выбраў Get_Reminder з Назвы макраса і выбраў VBA Mod.xlsm з Макрасы ў .

Нарэшце націсніце ОК .

Затым націсніце на кнопку з назвай Get_Reminder .

Такім чынам, ён пакажа паведамленне з астаткам .

Вы можаце зрабіць гэта для ўсіх лічбаў , каб атрымаць астатак .

Дадатковая інфармацыя: Функцыя фарматавання VBA ў Excel (8 варыянтаў выкарыстання з прыкладамі)

2. Выкарыстанне спасылкі на ячэйкі ў VBA Mod для атрымання астатку

Выкарыстоўваючы Cell Reference з аркуша Excel, вы можаце атрымаць рэшту з VBA Mod .

Каб адкрыць VBA рэдактары, выканайце крокі, апісаныя ў раздзеле 1.

Затым увядзіце наступны код у Module .

6221

Тут, у Reminder_Using_CellReference , я абвясціў зменную n як Integer і выкарыстаў яе, каб захаваць вяртанае значэнне Mod аператар.

Далей , выкарыстаў спасылку на ячэйку B4 як нумар1 і C4 як лік2 (дзельнік)

Потым выкарыстоўваў MsgBox , каб паказаць астатак .

Цяпер, Захавайце код і вярніцеся да працоўнага ліста.

Каб уставіць Кнопка , выканайце крокі, апісаныя ў раздзеле 1.

➤ Я назваў кнопку Спасылка на ячэйку .

Пасля гэтага націсніце на Кнопка для запуску VBA код.

Такім чынам, вы атрымаеце астатак для выкарыстоўванай спасылкі на ячэйку.

Звязаны змест: як Вярнуць значэнне ў функцыі VBA (як значэнні масіва, так і значэнні, якія не ўваходзяць у масіў)

3. Выкарыстанне VBA Mod для атрымання астатку ад адмоўнага ліку

VBA Mod таксама падтрымлівае адмоўныя лічбы пры вылічэнні астатку .

Каб адкрыць VBA рэдактара, выканайце дзеянні, апісаныя ў раздзеле 1.

Затым увядзіце наступны код у Модулі .

6721

Тут , у Reminder_From_NegativeNumber, я аб'явіў зменную n як Integer і выкарыстаў яе, каб захаваць вяртанае значэнне аператара Mod .

Далей выкарыстаў спасылку на ячэйку B5 як нумар1 і C5 як лік2 (дзельнік)

Затым выкарыстаў MsgBox , каб паказаць астатак .

Цяпер Захавайце код і вярніцеся да працоўнага ліста.

Каб уставіць кнопку , выканайце крокі, апісаныя ў раздзеле 1.

➤ Я назваў th Кнопка e Напамін ад адмоўнага ліку .

Пасля гэтага націсніце кнопку Кнопка , каб запусціць код VBA .

Такім чынам, вы атрымаеце астатак для адмоўнага ліку .

Чытаць далей: Як выкарыстоўваць функцыю VBA IsNumeric (9 прыкладаў)

4. Выкарыстанне VBA Mod для атрымання астатку ў ячэйцы

Замест таго, каб паказваць астатак праз msg box вы можаце размясціць яго ў ячэйцы з дапамогай VBA MOD функцыі.

Каб адкрыць VBA рэдактара, выканайце дзеянні, апісаныя ў раздзеле 1.

Затым увядзіце наступны код у Модуль .

5060

Тут, у s ub-procedure Reminder_in_Cell я выкарыстаў фармат ActiveCell.FormulaR1C1 , каб атрымаць пазіцыю ActiveCell .

Потым выкарысталі функцыю MOD , каб атрымаць астатак .

Таксама выкарысталі метад Выбраць .

Зараз , Захавайце код і вярніцеся да працоўнага ліста.

Каб уставіць Кнопку і прызначыць код VBA выконвайце крокі, апісаныя ў раздзеле 1.

➤ Я назваў кнопку Напамін у ячэйцы .

Далей абярыце ячэйку D4 .

Затым націсніце кнопку Кнопка , каб запусціць код VBA .

У выніку вы атрымаеце рэшту ў выбранай ячэйцы.

Выконваючы той жа працэс, вы атрымаеце рэшту для астатняй часткі лічбы.

Дадатковая інфармацыя: Як выкарыстоўваць функцыю MsgBox у Excel VBA (поўнае кіраўніцтва)

5. Выкарыстанне VBA Mod з цэлым дзельнікам & Float Number

У выпадку, калі ваш дзельнік мае цэлы тып, але ваш лік знаходзіцца ў float увядзіце, то вы можаце выкарыстоўваць аператар VBA Mod .

Каб адкрыць рэдактар ​​ VBA , выканайце крокі, апісаныя ў раздзеле1.

Затым увядзіце наступны код у Module .

8664

Тут, у R eminder_From_Decimal_Number sub -працэдура, Я абвясціў зменную n як Цэлы лік і выкарыстаў яе для захавання вяртанага значэння аператара Mod .

Затым выкарыстаў спасылку на ячэйку B5 як нумар1 і C5 як лік2 (дзельнік)

Потым выкарыстоўваў MsgBox , каб паказаць астатак .

Зараз, Захавайце код і вярніцеся да працоўнага ліста.

Каб уставіць Кнопка , выканайце крокі, апісаныя ў раздзеле 1.

➤ Я назваў кнопку Напамін з дзесятковага ліку .

Пасля гэтага націсніце на Кнопка для запуску кода VBA .

Такім чынам, вы атрымаеце астатак для дзесятковага ліку .

Але ёсць праблема, што VBA акругляе дзесятковы ў большы бок. Тут вынік павінен быў быць 2,25 , але VBA Mod акругліў яго да 2 .

Запомніце, калі ёсць дзесятковы/ плаваючая кропка большая за 0,5 у VBA Mod тады яна будзе акруглена ў большы бок да наступнага цэлага значэння.

Калі яно меншае за 0,5 у VBA Mod , тады яно будзе акруглена ў большы бок да існуючага цэлага значэння.

Чытаць Больш: Як выкарыстоўваць функцыю VBA Int у Excel (3 прыклады)

Падобныя паказанні:

• Як выкарыстоўваць функцыю IsNull у Excel VBA (5Прыклады)
• Выкарыстанне функцыі VBA Str у Excel (4 прыклады)
• Як выкарыстоўваць функцыю пераключэння VBA (6 прыдатных прыкладаў)
• Выкарыстоўвайце функцыю Len VBA ў Excel (4 прыклады)
• Як выдаліць дублікаты ў аркушы Excel (7 метадаў)

6. Выкарыстанне VBA Mod When Divisor & Абодва ліку з'яўляюцца дзесятковымі знакамі

Калі ваш дзельнік і лік абодва маюць тып дзесятковы/з плаваючай часткай , то вы таксама можаце выкарыстоўваць VBA Mod аператар.

Каб адкрыць VBA рэдактар, выканайце дзеянні, апісаныя ў раздзеле 1.

Затым увядзіце наступны код у Модуль .

1125

Тут, у падпрацэдуры Decimal_Both_Divisor_Number, я аб'явіў зменную n як Цэлы лік і выкарыстоўваў яго для захавання вяртанага значэння аператара Mod .

Далей выкарыстоўваў спасылку на ячэйку B5 як number1 і C5 як number2 (дзельнік)

Потым выкарыстаў MsgBox , каб паказаць астатак .

Цяпер Захавайце код і вярніцеся да працоўнага ліста.

Каб уставіць Кнопку, выканайце крокі, апісаныя ў раздзеле 1.

➤ Я назваў кнопку Атрымаць Напамін ад дзельніка & Дзесятковы лік .

Пасля гэтага націсніце кнопку Кнопка , каб запусціць код VBA .

Такім чынам, вы атрымаеце астатак як для дзесятковага дзельніка і лікаў .

Але ёсць праблема, што VBA акругляе дзесятковы ў большы бок. Тут вынік павінен быў быць 1,75 , але VBA Mod акругліў яго да 2 .

Звязаны змест: Функцыя VBA EXP у Excel (5 прыкладаў)

7. Мод VBA для акруглення дзесятковага ліку, большага за 0,5

Вось я буду паказаць вам, як акругленне працуе ў VBA Mod .

Каб прадэманстраваць вам праблему дзесятковай кропкі, спачатку я вылічу астатак з дапамогай функцыі Excel MOD .

У ячэйцы D4 увядзіце наступную формулу,

Тут я выкарыстаў B6 як лік С6 як дзельнік .

Тады, націсніце ENTER , каб атрымаць рэшту , і вы атрымаеце рэшту , якая будзе 7,7 .

Цяпер давайце вылічым праз VBA Mod , каб адкрыць рэдактар ​​ VBA , выканайце крокі, апісаныя ў раздзеле 1.

Потым увядзіце наступны код у Module .

3601

Тут, у падпрацэдуры Decimal_Both_Divisor_Number, я абвясціў зменная e n як Цэлы лік і выкарыстаў яго для захавання вернутага значэння аператара Mod .

Далей выкарыстаў спасылку на ячэйку B6 як number1 і C6 як number2 (дзельнік)

Потым выкарыстоўвалі MsgBox , каб паказаць астатак .

Цяпер Захавайце код і вярніцеся да працоўнага ліста.

Каб уставіць Кнопку , выканайце укрокі, апісаныя ў раздзеле 1.

➤ Я назваў кнопку RoundsUp Decimal Number .

Пасля гэтага націсніце кнопку Button , каб запусціць VBA код.

Такім чынам, вы атрымаеце астатак для выкарыстанай спасылкі на ячэйку.

Паглядзіце ўважліва у астатку , які вярнуў VBA Mod . Функцыя MOD для тых жа значэнняў вярнула 7.7 , але аператар VBA Mod вярнуў 0 . Паколькі VBA акругліў значэнні.

Дадатковая інфармацыя: Як выкарыстоўваць функцыю акруглення VBA ў Excel (6 хуткіх спосабаў выкарыстання)

8. Вызначэнне цотнага або няцотнага ліку

VBA Mod таксама вызначае цотны ці няцотны лік з зададзенага дыяпазону.

Каб адкрыць рэдактар ​​ VBA , выканайце крокі, апісаныя ў раздзеле 1.

Затым увядзіце наступны код у Модуль .

4407

Тут, у падпрацэдуры Determine_Even_Or_Odd, я абвясціў зменную n як Integer .

Потым я выкарыстаў цыкл For , дзе я захаваў значэнне, якое я аб'явіў праз спасылку на ячэйку.

Далей я выкарыстаў IF функцыя, у якой я ўстанаўліваю крытэрыі як n Mod 2 = 0 , калі значэнне праўдзівае, тады яно верне аператар Чотны , інакш Няцотны .

Затым выкарыстаў MsgBox , каб паказаць запісы .

Цяпер захавайце код і вярніцеся да працоўнага ліста.

Каб уставіць Кнопку , выканайце наступныя дзеянні