Содржина
VBA Mod не е функција додека MOD е функција во работниот лист на Excel. VBA Mod е оператор кој дели два броја и го враќа остатокот . Операторот Mod е кратка форма на MODULO што се користи во математичките операции. Операторите Mod заокружуваат подвижна запирка .
Во оваа статија, ќе покажам ви различни примери за користење на Excel VBA Mod оператор.
Преземете за вежбање
Примери за VBA Mod оператор. xlsm
Основи на функцијата VBA Mod: Резиме & засилувач; Синтакса
Резиме
Операторот VBA Mod дели два броја и го враќа остатокот . Онаму каде што еден е познат како делител другиот е број . Операторот Mod го дели бројот со делител .
Синтакса
Number1 Mod Number2 (Divisor)
Аргументи
Аргументи | Потребни/ Изборно | Објаснување |
---|---|---|
Број 1 | Задолжително | Тоа е нумерички израз |
Број2 | Задолжителен | Тоа е нумерички израз |
Повратна вредност
Операторот 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.
Потоа, напишете го следниов код во Модул .
2532
Тука, во подпроцедурата Get_Reminder_UsingVBA, Ја декларирав променливата n како Цел број .
Потоа, користев јамка For каде што ја задржав вредноста што ја декларирав преку референцата на ќелијата. Јамката ќе работи за вредностите од редовите 4 до 9 .
Потоа се користи MsgBox за да се прикаже остатокот .
Сега, Зачувајте го кодот и вратете се на работниот лист.
За да го вметнете Копчето , следете ги чекорите објаснети во делот 1 .
➤ Го именував копчето Референца за динамички ќелии .
Потоа, кликнете на копчето копче за да ја извршите VBA код.
Затоа, ќе го добиете остатокот за сите употребени вредности еденпо еден.
Првиот е за бројот 29 каде што делителот е 3 .
Вториот е за бројот -47 каде што делител е 5 .
Јамката ќе работи додека не стигне до редот 9 . Петтиот е за бројот 59 каде што делителот е 6 .
Поврзани содржини: Како да се користи VBA рандомизирана функција во Excel (5 примери)
Разлика помеѓу Excel MOD & VBA Mod
Иако за повеќето случаи повратните вредности се исти за функцијата MOD и за операторот VBA Mod , сепак за некои случаи резултатот се разликуваат едни од други. Дозволете ми да ви ја покажам разликата помеѓу нив.
MOD Function | VBA Mod Operator |
---|---|
Функцијата MOD враќа и Цел број и децимални броеви. | Мод операторот враќа само Цел број броеви. |
Додека користи негативен број во MOD не враќа негативен знак . | Подржува негативни броеви и потоа го враќа негативниот знак . |
Работи што треба да се запаметат
🔺 Операторот ќе ги заокружи децималните/лебдечките точки.
Оддел за вежбање
Дадов лист за вежбање во работната книга за да ги вежбам овие објаснети примери.
Заклучок
Во оваа статија, покажав 9 примери на операторот Excel VBA Mod . Се обидов и да ги покријам причините за често да прикажувам грешки. Заедно со работите што ќе треба да ги запомните додека го користите операторот. Слободно коментирајте подолу за какви било прашања и предлози.
имплементирајте ги овие примери.9 Примери за користење на функцијата VBA Mod во Excel
1. Користење на VBA Mod за да добиете остаток
Ако сакате, можете да добиете остаток со користење на VBA Mod операторот.
Дозволете ми да ви ја објаснам процедурата,
За почеток, отворете го Developer таб >> изберете Visual Basic .
➤ Сега, ќе се појави нов прозорец на Microsoft Visual Basic за апликации .
Следно, од Вметни >> изберете Модул
Сега, напишете го следниов код во Модулот .
3373
Овде, во подпроцедурата Get_Reminder , ја прогласив променливата n како Цел број и ја искористив за да ја задржам вратената вредност на Мод оператор.
Потоа се користи MsgBox за да се прикаже остатокот .
Сега, Зачувај код и вратете се на работниот лист.
Повторно, отворете ја картичката Програмер >> од Вметни >> изберете Копче од Контроли за форма
Сега, Повлечете го копчето до ставете го онаму каде што сакате да го дадете насловот.
Следно, можете да му дадете име на копчето.
➤ Го нареков Добијте потсетник .
⏩ Сега, десен клик на глувчето ќе се појави контекстното мени Додели Макро .
Оттаму изберете Назначи макро .
⏩ Ќе се појави дијалог поле од Додели макро .
Потоа,изберете го Името на макрото и макроата во .
⏩ Избрав Потсетник_добиј од името на макрото и избрав VBA Mod.xlsm од Макроа во .
Конечно, кликнете OK .
Потоа, кликнете на копчето со име Get_Reminder .
Оттука, ќе се прикаже кутија за пораки со остаток .
Можете да го направите тоа за сите броеви за да го добиете остатокот .
Прочитај повеќе: Функција на формат VBA во Excel (8 употреби со примери)
2. Користење на референца на ќелија во VBA Mod за да се добие остаток
Со користење на Cell Reference од листот Excel, можете да го добиете остатокот од VBA Mod .
За да го отворите VBA уредник, следете ги чекорите објаснети во делот 1.
Потоа, напишете го следниов код во Модулот .
9058
Овде, во Reminder_Using_CellReference , ја прогласив променливата n како Цел број и ја искористив за да ја задржам вратената вредност на Mod оператор.
Следно , ја користеше референцата на ќелијата B4 како број1 и C4 како број2 (делител)
Потоа се користи MsgBox за да се прикаже остатокот .
Сега, Зачувајте го кодот и вратете се на работниот лист.
За да го вметнете Копче , следете ги чекорите објаснети во делот 1.
➤ Го именував копчето Референца на ќелија .
Потоа, кликнете на Копче за стартување на VBA код.
Затоа, ќе го добиете остатокот за референцата за користена ќелија.
Поврзана содржина: Како да Врати вредност во VBA функцијата (и низа и вредности без низа)
3. Користење на VBA Mod за да се добие остаток од негативен број
На VBA Mod поддржува и негативни броеви додека го пресметува остатокот .
За да го отворите VBA уредник, следете ги чекорите објаснети во делот 1.
Потоа, напишете го следниов код во Модулот .
2251
Тука , во Reminder_From_NegativeNumber, ја прогласив променливата n како Цел број и ја искористив за да ја задржам вратената вредност на операторот Mod .
Следно, ја користев референцата на ќелијата B5 како број 1 и C5 како број2 (делител)
Потоа искористете го MsgBox за да го прикажете остатокот .
Сега, Зачувајте го кодот и вратете се на работниот лист.
За да го вметнете копчето , следете ги чекорите објаснети во делот 1.
➤ Го именував ти e копче Потсетник од негативен број .
Потоа, кликнете на копчето за да го вклучите кодот VBA .
Затоа, ќе го добиете остатокот за негативниот број .
Прочитајте повеќе: Како да се користи VBA IsNumeric Function (9 примери)
4. Користење на VBA Mod за да се добие остаток во ќелијата
Наместо да се прикаже остатокот прекуПолето msg можете да го поставите во ќелија со користење на функцијата VBA MOD .
За да ја отворите VBA уредник, следете ги чекорите објаснети во делот 1.
Потоа, напишете го следниов код во Модулот .
4839
Тука, во s постапката Reminder_in_Cell , го користев форматот ActiveCell.FormulaR1C1 за да ја добијам позицијата на ActiveCell .
Потоа, ја искористивте функцијата MOD за да го добиете остатокот .
Исто така, го користевте методот Изберете .
Сега , Зачувајте го кодот и вратете се на работниот лист.
За да го вметнете Копчето и доделете VBA кодот следете ги чекорите објаснети во делот 1.
➤ Го именував копчето Потсетник во ќелијата .
Следно, изберете ја ќелијата D4 .
Потоа, кликнете на копчето за да го извршите кодот VBA .
Како резултат, ќе добиете остатокот во избраната ќелија.
Со следење на истиот процес, ќе го добиете остатокот за остатокот од бројки.
Прочитајте повеќе: Како да ја користите функцијата MsgBox во Excel VBA (целосно упатство)
5. Користење на VBA Mod со делител на цели броеви & засилувач; Float Number
Во случај вашиот делител е цел број тип, но вашиот број е во float напишете потоа можете да го користите VBA Mod операторот.
За да го отворите уредникот VBA , следете ги чекорите објаснети во делот1.
Потоа, напишете го следниов код во Модулот .
8889
Тука, во подругата R eminder_From_Decimal_Number -процедура, Ја прогласив променливата 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 Switch (6 соодветни примери)
- Користете ја функцијата VBA Len во Excel (4 примери)
- Како да отстраните дупликати во листот Excel (7 методи)
6. Користење на VBA Mod When Divisor & засилувач; Бројот се и двата децимални
Ако вашиот делител и бројот и двата се во типот децимален/пловец , тогаш можете исто така да го користите VBA Mod оператор.
За да го отворите уредникот VBA , следете ги чекорите објаснети во делот 1.
Потоа, напишете го следниов код во Модул .
1646
Тука, во подпроцедурата Decimal_Both_Divisor_Number, Ја декларирав променливата n како Цел број и го искористи за да ја задржи вратената вредност на операторот Mod .
Следно, ја искористи референцата на ќелијата B5 како број 1 и C5 како број2 (делител)
Потоа се користи MsgBox за да се прикаже остатокот .
Сега, Зачувајте го кодот и вратете се на работниот лист.
За да го вметнете копчето , следете ги чекорите објаснети во делот 1.
➤ Го именував копчето Преземи Потсетник од When Divisor & Број Децимална .
Потоа, кликнете на копчето за да го извршите кодот VBA .
Затоа, ќе го добиете остаток и за децимален делител и броеви .
Но, постои проблем што VBA го заокружува децималното . Овде, резултатот требаше да биде 1,75 но VBA Mod го заокружи на 2 .
Поврзани содржини: Функција VBA EXP во Excel (5 примери)
7. VBA Mod за да се заокружи децимален број поголем од 0,5
Тука, ќе ви покаже како функционира заокружете во VBA Mod .
За да ви го покажам проблемот со децималната точка, прво ќе го пресметам остаток користејќи ја функцијата Excel MOD .
Во ќелијата D4 , напишете ја следнава формула,
=MOD(B6, C6)
Овде, користев B6 како број C6 како делител .
Потоа, притиснете ENTER за да го добиете остатокот и ќе го добиете остатокот кој ќе биде 7.7 .
Сега, ајде да пресметаме преку VBA Mod , за да го отвориме уредникот VBA следете ги чекорите објаснети во делот 1.
Потоа, напишете ја следнава шифра во Модулот .
8338
Овде, во подпроцедурата Децимални_Два_Деливец_Број, Изјавив променливата e n како Цел број и го искористи за да ја задржи вратената вредност на операторот Mod .
Следно, ја искористи референцата на ќелијата B6 како број1 и C6 како број2 (делител)
Потоа го искористи MsgBox за да го прикаже остаток .
Сега, Зачувајте ја шифрата и вратете се на работниот лист.
За да го вметнете Копчето , следете начекорите објаснети во делот 1.
➤ Го именував копчето RoundsUp Decimal Number .
Потоа, кликнете на копчето Копчето за да го извршите VBA код.
Затоа, ќе го добиете остатокот за референцата користена ќелија.
Погледнете внимателно на остатокот дека VBA Mod се врати. Функцијата MOD за истите вредности се врати 7.7 но операторот VBA Mod врати 0 . Како што VBA ги заокружи вредностите.
Прочитај повеќе: Како да се користи VBA круг функција во Excel (6 брзи употреби)
8. Определете парен или непарен број
VBA Mod исто така го одредува Парниот или Непарниот бројот од даден опсег.
За да го отворите уредникот VBA , следете ги чекорите објаснети во делот 1.
Потоа, напишете го следниов код во Модулот .
6450
Овде, во подпроцедурата Determine_Even_or_Odd, Ја прогласив променливата n како Цел број .
Потоа, користев јамка For каде што ја задржав вредноста што ја декларирав преку референцата на ќелијата.
Следно, користев IF функција каде што ги поставив критериумите како n Mod 2 = 0 ако вредноста е вистинита тогаш ќе врати Пар изјава инаку Чудно .
Потоа го искористи MsgBox за да ги прикаже изјавите .
Сега, Зачувај кодот и вратете се на работниот лист.
За да го вметнете Копчето , следете ги чекорите