Kako koristiti VBA Mod Operator (9 primjera)

  • Podijeli Ovo
Hugh West

VBA Mod nije funkcija dok je MOD funkcija u Excel radnom listu. VBA Mod je operator koji dijeli dva broja i vraća ostatak . Operator Mod je skraćeni oblik od MODULO koji se koristi u matematičkim operacijama. Operatori Mod zaokružuju pokretni zarez .

U ovom ću članku pokazati možete pronaći različite primjere korištenja Excel VBA Mod operatora.

Preuzmi za vježbu

Primjeri VBA Mod operatora. xlsm

Osnove VBA mod funkcije: Sažetak & Sintaksa

Sažetak

Operator VBA Mod dijeli dva broja i vraća ostatak . Gdje je jedan poznat kao djelitelj drugi je broj . Operator Mod dijeli broj djeliteljem .

Sintaksa

Number1 Mod Number2 (Divisor)

Argumenti

Argumenti Potrebni/ Neobavezno Objašnjenje
Broj1 Potrebno To je numerički izraz
Broj2 Obavezno To je numerički izraz

Povratna vrijednost

Operator VBA Mod vraća ostatak .

Verzija

Operator VBA Mod dostupan je za Excel 2000 i novije verzije.

Koristim Excel Microsoft 365 zaobjašnjeno u odjeljku 1.

➤ Gumb sam nazvao Par ili Nepar .

Nakon toga kliknite na Gumb za pokretanje VBA kod.

Dakle, saznat ćete koja je vrijednost parna a koja je neparna .

Ovdje, 1 je neparan broj.

Ovdje, 2 je parni broj.

Pročitajte više: VBA If – Then – Else izjava u Excelu (4 primjera)

9. Korištenje raspona ćelija u modu VBA za dobivanje ostatka

Također možete koristiti raspon ćelija za dobivanje ostatka korištenjem VBA Mod .

Da biste otvorili VBA uređivač, slijedite korake objašnjene u odjeljku 1.

Zatim upišite sljedeći kod u Modul .

6646

Ovdje, u podproceduri Get_Reminder_UsingVBA, deklarirao sam varijablu n kao Integer .

Zatim sam upotrijebio petlju For gdje sam zadržao vrijednost koju sam deklarirao kroz referencu ćelije. Petlja će raditi za vrijednosti od redaka 4 do 9 .

Zatim upotrijebite MsgBox za prikaz ostatka .

Sada, Spremite kôd i vratite se na radni list.

Da biste umetnuli Gumb , slijedite korake objašnjene u odjeljku 1 .

➤ Gumb sam nazvao Dinamička referenca ćelije .

Nakon toga kliknite na Gumb za pokretanje VBA kod.

Dakle, dobit ćete ostatak za sve korištene vrijednosti jedanza jedan.

Prvi je za broj 29 gdje je djelitelj 3 .

Drugi je za broj -47 gdje je djelitelj 5 .

Petlja će raditi dok ne dođe do reda 9 . Peti je za broj 59 gdje je djelitelj 6 .

Povezani sadržaj: Kako koristiti funkciju VBA Randomize u Excelu (5 primjera)

Razlika između Excel MOD & VBA Mod

Iako su u većini slučajeva povratne vrijednosti iste za MOD funkciju i VBA Mod operator, ipak u nekim slučajevima rezultat međusobno razlikuju. Dopustite da vam pokažem razliku između njih.

MOD Funkcija VBA Mod Operator
Funkcija MOD vraća cijele i decimalne brojeve. Mod operator vraća samo cijele brojeve.
Dok koristi negativan broj u MOD ne vraća negativan predznak . Podržava negativne brojeve, a zatim vraća negativan predznak .

Stvari koje treba zapamtiti

🔺 Operator zaokružit će decimalne/pokretne točke.

Odjeljak za vježbu

U radnoj bilježnici sam dao vježbu za vježbanje ovih objašnjenih primjera.

Zaključak

U ovom sam članku pokazao 9 primjera Excel VBA Mod operatora. Također sam pokušao pokriti razloge za često prikazivanje pogrešaka. Zajedno sa stvarima koje ćete morati zapamtiti dok koristite operator. Slobodno komentirajte dolje za sve vrste upita i prijedloga.

implementirajte ove primjere.

9 primjera korištenja VBA Mod funkcije u Excelu

1. Korištenje VBA Mod za dobivanje ostatka

Ako želite, možete dobiti ostatak pomoću VBA Mod operatora.

Dopustite da vam objasnim postupak,

Za početak otvorite Developer kartica >> odaberite Visual Basic .

➤ Sada će se pojaviti novi prozor Microsoft Visual Basic za aplikacije .

Sljedeće, od Insert >> odaberite Modul

Sada upišite sljedeći kod u Modul .

2326

Ovdje, u potproceduri Get_Reminder , deklarirao sam varijablu n kao Integer i upotrijebio je da zadržim vraćenu vrijednost Mod operator.

Zatim upotrijebite MsgBox za prikaz ostatka .

Sada, Spremite kod i vratite se na radni list.

Opet otvorite Programer karticu >> iz Umetni >> odaberite Gumb iz Kontrola obrasca

Sada Povucite Gumb na postavite ga na mjesto gdje želite dati naslov.

Zatim, možete dati naziv gumbu.

➤ Nazvao sam ga Dohvati podsjetnik .

⏩ Sada, desni klik na mišu pojavit će se kontekstni izbornik Dodijeli Makro .

Odatle odaberite Dodijeli makro .

⏩ Pojavit će se dijaloški okvir od Dodijeli makro .

Zatim,odaberite Macro name i Macros in .

⏩ Izabrao sam Get_Reminder iz Macro name i odabrao VBA Mod.xlsm iz Makronaredbe u .

Na kraju kliknite U redu .

Zatim kliknite na gumb pod nazivom Get_Reminder .

Stoga će se prikazati poruka s ostatkom .

Možete to učiniti za sve brojeve da biste dobili ostatak .

Pročitajte više: Funkcija VBA formata u Excelu (8 upotreba s primjerima)

2. Korištenje reference ćelije u VBA modu za dobivanje ostatka

Koristeći Referencu ćelije iz Excel lista, možete dobiti ostatak iz VBA Mod .

Da biste otvorili VBA uređivač, slijedite korake objašnjene u odjeljku 1.

Zatim upišite sljedeći kod u Modul .

5391

Ovdje, u Reminder_Using_CellReference , deklarirao sam varijablu n kao Integer i upotrijebio je da zadržim vraćenu vrijednost Mod operator.

Dalje , upotrijebio je referencu ćelije B4 kao broj1 i C4 kao broj2 (djelitelj)

Zatim je upotrijebio MsgBox za prikaz ostatka .

Sada, Spremite kod i vratite se na radni list.

Za umetanje Gumb , slijedite korake objašnjene u odjeljku 1.

➤ Gumb sam nazvao Referenca ćelije .

Nakon toga kliknite na Gumb za pokretanje VBA kod.

Stoga ćete dobiti ostatak za korištenu referencu ćelije.

Povezani sadržaj: Kako Vrati vrijednost u VBA funkciji (vrijednosti niza i vrijednosti koje nisu nizovi)

3. Korištenje VBA moda za dobivanje ostatka od negativnog broja

The VBA Mod također podržava negativne brojeve dok izračunava ostatak .

Za otvaranje VBA uređivač, slijedite korake objašnjene u odjeljku 1.

Zatim upišite sljedeći kod u Modul .

3662

Ovdje , u Reminder_From_NegativeNumber, deklarirao sam varijablu n kao Integer i upotrijebio je da zadržim vraćenu vrijednost operatora Mod .

Zatim je korištena referenca ćelije B5 kao broj1 i C5 kao broj2 (djelitelj)

Zatim upotrijebite MsgBox za prikaz ostatka .

Sada, Spremite kod i vratite se na radni list.

Da biste umetnuli gumb, slijedite korake objašnjene u odjeljku 1.

➤ Imenovao sam e gumb Podsjetnik s negativnog broja .

Nakon toga kliknite na gumb za pokretanje VBA koda.

Stoga ćete dobiti ostatak za negativan broj .

Pročitajte više: Kako koristiti VBA IsNumeric funkciju (9 primjera)

4. Korištenje VBA moda za dobivanje ostatka u ćeliji

Umjesto prikazivanja ostatka kroz msg box možete ga smjestiti u ćeliju pomoću VBA MOD funkcije.

Za otvaranje VBA urednik, slijedite korake objašnjene u odjeljku 1.

Zatim upišite sljedeći kod u Modul .

1135

Ovdje, u s ub-procedure Reminder_in_Cell , upotrijebio sam format ActiveCell.FormulaR1C1 da dobijem položaj ActiveCell .

Zatim, upotrijebio MOD funkciju da dobiješ ostatak .

Također, upotrijebio Odaberi metodu.

Sada , Spremite kod i vratite se na radni list.

Da biste umetnuli Gumb i dodijelili VBA kod slijedite korake objašnjene u odjeljku 1.

➤ Gumb sam nazvao Podsjetnik u ćeliji .

Zatim odaberite ćeliju D4 .

Zatim kliknite na Gumb za pokretanje VBA koda.

Kao rezultat, dobit ćete ostatak u odabranoj ćeliji.

Slijedeći isti postupak, dobit ćete ostatak za ostatak brojevi.

Pročitajte više: Kako koristiti funkciju MsgBox u programu Excel VBA (potpune smjernice)

5. Korištenje VBA moda s cjelobrojnim djeliteljem & Float Number

U slučaju da je vaš djelitelj tip cijelog ali vaš broj je u float upišite tada možete koristiti VBA Mod operator.

Da biste otvorili VBA uređivač, slijedite korake objašnjene u odjeljku1.

Zatim upišite sljedeći kod u Module .

5280

Ovdje, u R eminder_From_Decimal_Number sub -procedure, Deklarisao sam varijablu n kao Integer i upotrijebio je da zadržim vraćenu vrijednost Mod operatora.

Zatim je korištena referenca ćelije B5 kao broj1 i C5 kao broj2 (djelitelj)

Zatim je korišten MsgBox za prikaz ostatka .

Sada, Spremite kod i vratite se na radni list.

Za umetanje Gumb , slijedite korake objašnjene u odjeljku 1.

➤ Gumb sam nazvao Podsjetnik s decimalnog broja .

Nakon toga kliknite na Gumb za pokretanje VBA koda.

Stoga ćete dobiti ostatak za decimalni broj .

Ali postoji problem da VBA zaokružuje decimale . Ovdje je rezultat trebao biti 2.25 ali ga je VBA Mod zaokružio na 2 .

Zapamtite ako postoji decimala/ plutajući zarez je veći od 0,5 u VBA modu tada će biti zaokružen naviše na sljedeću vrijednost cijelog broja.

Ako manji je od 0,5 u VBA modu , tada će biti zaokružen naviše na postojeću vrijednost cijelog broja.

Pročitajte Više: Kako koristiti VBA Int funkciju u Excelu (3 primjera)

Slična čitanja:

  • Kako koristiti IsNull funkciju u programu Excel VBA (5Primjeri)
  • Koristite VBA Str funkciju u Excelu (4 primjera)
  • Kako koristiti VBA Switch funkciju (6 prikladnih primjera)
  • Koristite VBA Len funkciju u Excelu (4 primjera)
  • Kako ukloniti duplikate u Excel tablici (7 metoda)

6. Korištenje VBA Mod Kada Divisor & Oba su decimalna mjesta

Ako su i vaš djelitelj i broj u tipu decimala/float , tada također možete koristiti VBA Mod operator.

Da biste otvorili VBA uređivač, slijedite korake objašnjene u odjeljku 1.

Zatim upišite sljedeći kod u Modul .

6424

Ovdje, u potproceduri Decimal_Both_Divisor_Number, deklarirao sam varijablu n kao Integer i upotrijebio ga za zadržavanje vraćene vrijednosti operatora Mod .

Potom je upotrijebio referencu ćelije B5 kao broj1 i C5 kao broj2 (djelitelj)

Zatim je korišten MsgBox za prikaz ostatka .

Sada, Spremite kôd i vratite se na radni list.

Da biste umetnuli Gumb, slijedite korake objašnjene u odjeljku 1.

➤ Gumb sam nazvao Get Reminder From When Divisor & Decimalni broj .

Nakon toga kliknite na Gumb za pokretanje VBA koda.

Stoga ćete dobiti ostatak za decimalni djelitelj i brojeve .

Ali postoji problem koji VBA zaokružuje decimalnu . Ovdje je rezultat trebao biti 1,75 ali ga je VBA Mod zaokružio na 2 .

Povezani sadržaj: VBA EXP funkcija u Excelu (5 primjera)

7. VBA Mod za zaokruživanje decimalnog broja većeg od 0,5

Ovdje ću pokazati vam kako zaokruživanje radi u VBA modu .

Da bih vam demonstrirao problem decimalne točke, prvo ću izračunati ostatak koristeći Excel MOD funkciju.

U ćeliju D4 upišite sljedeću formulu,

=MOD(B6, C6)

Ovdje sam upotrijebio B6 kao broj C6 kao djelitelj .

Onda, pritisnite ENTER da biste dobili ostatak i dobit ćete ostatak koji će biti 7.7 .

Sada, izračunajmo kroz VBA Mod , da biste otvorili VBA uređivač, slijedite korake objašnjene u odjeljku 1.

Zatim upišite sljedeći kod u Module .

2624

Ovdje, u potproceduri Decimal_Both_Divisor_Number, deklarirao sam varijabl e n kao Integer i upotrijebio ga za zadržavanje vraćene vrijednosti operatora Mod .

Potom je upotrijebio referencu ćelije B6 kao broj1 i C6 kao broj2 (djelitelj)

Zatim je korišten MsgBox za prikaz ostatak .

Sada, Spremite kod i vratite se na radni list.

Da biste umetnuli Gumb , slijedite thekoraci objašnjeni u odjeljku 1.

➤ Gumb sam nazvao Zaokruživanje decimalnog broja .

Nakon toga kliknite na Gumb za pokretanje VBA kod.

Stoga ćete dobiti ostatak za korištenu referencu ćelije.

Pažljivo pogledajte na ostatku koji je VBA Mod vratio. Funkcija MOD za iste vrijednosti vratila je 7.7 ali je VBA Mod operator vratio 0 . Kako je VBA zaokružio vrijednosti.

Pročitajte više: Kako koristiti VBA funkciju zaokruživanja u Excelu (6 brzih upotreba)

8. Odredite parni ili neparni broj

VBA Mod također određuje parni ili neparni broj iz zadanog raspona.

Da biste otvorili VBA uređivač, slijedite korake objašnjene u odjeljku 1.

Zatim upišite sljedeći kod u Modul .

5245

Ovdje, u potproceduri Determine_Even_Or_Odd, deklarirao sam varijablu n kao Integer .

Zatim sam upotrijebio petlju For gdje sam zadržao vrijednost koju sam deklarirao kroz referencu ćelije.

Dalje sam upotrijebio IF funkcija u kojoj postavljam kriterij kao n Mod 2 = 0 ako je vrijednost istinita, vratit će naredbu Even u protivnom Odd .

Zatim sam upotrijebio MsgBox za prikaz izjava .

Sada, Spremite kod i vratite se na radni list.

Za umetanje Gumba , slijedite korake

Hugh West vrlo je iskusan Excel trener i analitičar s više od 10 godina iskustva u industriji. Diplomirao je računovodstvo i financije te magistrirao poslovno upravljanje. Hugh ima strast za podučavanjem i razvio je jedinstveni pristup podučavanju koji je lako pratiti i razumjeti. Njegovo stručno poznavanje programa Excel pomoglo je tisućama studenata i profesionalaca diljem svijeta da poboljšaju svoje vještine i postignu uspjeh u karijeri. Putem svog bloga, Hugh dijeli svoje znanje sa svijetom, nudeći besplatne vodiče za Excel i online obuku kako bi pomogao pojedincima i tvrtkama da dostignu svoj puni potencijal.