The VBA Mod ei ole funktio, kun taas MOD on Excel-taulukon funktio. VBA Mod on operaattori, joka jakaa kaksi lukua ja palauttaa arvon jäännös Operaattori Mod on lyhenne sanoista MODULO jota käytetään matematiikan operaatioissa. Mod operaattorit yhteenveto ... liukuluku .

Tässä artikkelissa näytän sinulle erilaisia esimerkkejä Excelin käytöstä. VBA Mod operaattori.

Lataa Practice

VBA:n perusteet Mod Function: Yhteenveto & Syntaksi

Yhteenveto

The VBA Mod operaattori jakaa kaksi lukua ja palauttaa jäännös . Jos yksi tunnetaan nimellä jakaja toinen on numero . Mod operaattori jakaa numero jonka jakaja .

Syntaksi

Numero1 Mod Numero2 (jakaja)

Argumentit

Paluuarvo

The VBA Mod operaattori palauttaa jäännös .

Versio

The VBA Mod on käytettävissä Excel 2000:ssa ja uudemmissa versioissa.

Käytän Exceliä Microsoft 365 toteuttaa nämä esimerkit.

9 esimerkkiä VBA Mod -funktion käyttämisestä Excelissä

1. VBA-modin käyttäminen jäännösosan saamiseksi

Jos haluat, voit saada jäännös käyttämällä VBA Mod operaattori.

Selitän sinulle menettelyn,

Avaa aluksi Kehittäjä Valitse välilehti>> Valitse Visual Basic .

➤ Nyt, uusi ikkuna Microsoft Visual Basic for Applications ilmestyy.

Seuraavaksi, alkaen Lisää >> Valitse Moduuli

Kirjoita nyt seuraava koodi kenttään Moduuli .

 Sub Get_Reminder() Dim n As Integer n = 29 Mod 3 MsgBox " 29 Mod 3 is " & n End Sub 

Täällä Get_Reminder aliproseduuri, ilmoitin muuttujan n kuten Kokonaisluku ja käytimme sitä pitämään palautetun arvon Mod operaattori.

Sitten käytettiin MsgBox näyttää jäännös .

Nyt, Tallenna koodi ja palaa takaisin laskentataulukkoon.

Avaa jälleen Kehittäjä tab>> alkaen Lisää >> Valitse Nappi osoitteesta Lomakkeen ohjaimet

Nyt, Vedä ... Nappi sijoittaa sen kohtaan, johon haluat antaa kuvatekstin.

Seuraavaksi voit antaa painikkeelle nimen.

➤ Nimesin sen Hanki muistutus .

⏩ Nyt, klikkaa hiiren oikealla painikkeella kontekstivalikko Määritä Makro ilmestyy.

Valitse sieltä Määritä makro .

⏩ A valintaikkuna of Määritä makro ilmestyy.

Valitse sitten Makron nimi ja Makrot .

⏩ Valitsin Get_Reminder alkaen Makron nimi ja valittiin VBA Mod.xlsm osoitteesta Makrot .

Napsauta lopuksi OK .

Napsauta sitten painiketta nimeltä Get_Reminder .

Näin ollen se osoittaa msg box kanssa jäännös .

Voit tehdä sen kaikille numerot saadaksesi jäännös .

Lue lisää: VBA-muotoilutoiminto Excelissä (8 käyttöä esimerkkeineen)

2. Soluviittauksen käyttäminen VBA-muodossa saadaksesi jäännösosan

Käyttämällä Soluviite Excel-taulukosta, voit saada jäännös osoitteesta VBA Mod .

Avaa VBA editorissa, noudata kohdassa 1 selostettuja vaiheita.

Kirjoita sitten seuraava koodi kenttään Moduuli .

 Sub Reminder_Using_CellReference() Dim n As Integer n = Range("B4").Value Mod Range("C4").Value MsgBox Range("B4").Value & " Mod " & Range("C4").Value & " is " & n End Sub 

Täällä Reminder_Using_CellReference , ilmoitin muuttujan n kuten Kokonaisluku ja käytimme sitä pitämään palautetun arvon Mod operaattori.

Seuraavaksi käytetään soluviittausta B4 kuten numero1 ja C4 kuten number2 (jakaja)

Sitten käytettiin MsgBox näyttää jäännös .

Nyt, Tallenna koodi ja palaa takaisin laskentataulukkoon.

Jos haluat lisätä Nappi noudata kohdassa 1 selostettuja vaiheita.

➤ Nimesin napin Soluviite .

Napsauta sen jälkeen Nappi ajaa VBA koodi.

Siksi saat jäännös käytetylle soluviitteelle.

Aiheeseen liittyvä sisältö: Miten palauttaa arvo VBA-funktiossa (sekä array- että muut kuin array-arvot)?

3. VBA-modin käyttäminen jäännösosan saamiseksi negatiivisesta luvusta

The VBA Mod tukee myös negatiivinen numerot laskettaessa jäännös .

Avaa VBA editorissa, noudata kohdassa 1 selostettuja vaiheita.

Kirjoita sitten seuraava koodi kenttään Moduuli .

 Sub Reminder_From_NegativeNumber() Dim n As Integer n = Range("B5").Value Mod Range("C5").Value MsgBox Range("B5").Value & " Mod " & Range("C5").Value & " is " & n End Sub 

Täällä Reminder_From_NegativeNumber, Ilmoitin muuttujan n kuten Kokonaisluku ja käytimme sitä pitämään palautetun arvon Mod operaattori.

Seuraavaksi käytetään soluviittausta B5 kuten numero1 ja C5 kuten number2 (jakaja)

Sitten käytettiin MsgBox näyttää jäännös .

Nyt, Tallenna koodi ja palaa takaisin laskentataulukkoon.

Jos haluat lisätä Nappi, noudata kohdassa 1 selostettuja vaiheita.

➤ Nimesin napin Muistutus negatiivisesta numerosta .

Napsauta sen jälkeen Nappi ajaa VBA koodi.

Siksi saat jäännös varten negatiivinen luku .

Lue lisää: VBA IsNumeric -funktion käyttäminen (9 esimerkkiä)

4. VBA-modin käyttäminen solun jäännöksen hankkimiseen solussa

Sen sijaan, että näytetään jäännös kautta msg laatikko voit sijoittaa sen soluun käyttämällä komentoa VBA MOD toiminto.

Avaa VBA editorissa, noudata kohdassa 1 selostettuja vaiheita.

Kirjoita sitten seuraava koodi kenttään Moduuli .

 Sub Reminder_in_Cell() ActiveCell.FormulaR1C1 = "=MOD(RC[-2],RC[-1])" Range("D4").Select End Sub 

Täällä s ub-prosedure Reminder_in_Cell , käytin ActiveCell.FormulaR1C1 muodossa saadaksesi sijainnin ActiveCell .

Sitten käytettiin MOD funktio saadaksesi jäännös .

Myös käytetty Valitse menetelmä.

Nyt, Tallenna koodi ja palaa takaisin laskentataulukkoon.

Jos haluat lisätä Nappi ja määrätä ... VBA koodia kohdassa 1 selostettujen vaiheiden mukaisesti.

➤ Nimesin napin Muistutus solussa .

Valitse seuraavaksi D4 solu.

Napsauta sitten Nappi ajaa VBA koodi.

Tämän seurauksena saat jäännös valitussa solussa.

Samaa prosessia noudattamalla saat seuraavanlaisen jäännös loput numerot.

Lue lisää: Kuinka käyttää MsgBox-funktiota Excel VBA: ssa (täydellinen ohje)

5. Käyttämällä VBA Mod kanssa Integer Divisor & Float Number

Jos sinun jakaja on kokonaisluku tyyppi, mutta sinun numero on float tyyppiä, voit käyttää VBA Mod operaattori.

Avaa VBA editorissa, noudata kohdassa 1 selostettuja vaiheita.

Kirjoita sitten seuraava koodi kenttään Moduuli .

 Sub Reminder_From_Decimal_Number() Dim n As Integer n = Range("B5").Value Mod Range("C5").Value MsgBox Range("B5").Value & " Mod " & Range("C5").Value & " is " & n End Sub 

Täällä, R eminder_From_Decimal_Number aliproseduuri, Ilmoitin muuttujan n kuten Kokonaisluku ja käytimme sitä pitämään palautetun arvon Mod operaattori.

Seuraavaksi käytetään soluviittausta B5 kuten numero1 ja C5 kuten number2 (jakaja)

Sitten käytettiin MsgBox näyttää jäännös .

Nyt, Tallenna koodi ja palaa takaisin laskentataulukkoon.

Jos haluat lisätä Nappi noudata kohdassa 1 selostettuja vaiheita.

➤ Nimesin napin Muistutus desimaaliluvusta .

Napsauta sen jälkeen Nappi ajaa VBA koodi.

Siksi saat jäännös varten desimaaliluku .

On kuitenkin ongelma, että VBA pyöristää ... desimaali . Täällä tuloksen piti olla 2.25 mutta VBA Mod pyöristettynä 2 .

Muista, jos jokin desimaalinen/liukeva piste on suurempi kuin 0.5 vuonna VBA Mod niin se on pyöristetty ylöspäin seuraavaan kokonaislukuarvoon.

Jos se on pienempi kuin 0.5 vuonna VBA Mod , niin se on pyöristetty ylöspäin olemassa olevaan kokonaislukuarvoon.

Lue lisää: VBA Int -toiminnon käyttäminen Excelissä ( 3 esimerkkiä)

Samanlaisia lukemia:

• Kuinka käyttää IsNull-funktiota Excel VBA: ssa (5 esimerkkiä)
• Käytä VBA Str -funktiota Excelissä (4 esimerkkiä)
• VBA-vaihtotoiminnon käyttö (6 sopivaa esimerkkiä)
• Käytä VBA Len -funktiota Excelissä (4 esimerkkiä)
• Kuinka poistaa kaksoiskappaleet Excel-arkista (7 menetelmää)

6. VBA-modin käyttäminen, kun jakaja & luku ovat molemmat desimaaleja.

Jos jakaja ja numero molemmat ovat decimal/float tyyppiä, voit myös käyttää VBA Mod operaattori.

Avaa VBA editorissa, noudata kohdassa 1 selostettuja vaiheita.

Kirjoita sitten seuraava koodi kenttään Moduuli .

 Sub Decimal_Both_Divisor_Number() Dim n As Integer n = Range("B5").Value Mod Range("C5").Value MsgBox Range("B5").Value & " Mod " & Range("C5").Value & " is " & n End Sub 

Täällä aliprosessi Decimal_Both_Divisor_Number, Ilmoitin muuttujan n kuten Kokonaisluku ja käytimme sitä pitämään palautetun arvon Mod operaattori.

Seuraavaksi käytetään soluviittausta B5 kuten numero1 ja C5 kuten number2 (jakaja)

Sitten käytettiin MsgBox näyttää jäännös .

Nyt, Tallenna koodi ja palaa takaisin laskentataulukkoon.

Jos haluat lisätä Nappi, noudata kohdassa 1 selostettuja vaiheita.

➤ Nimesin napin Hanki Muistutus siitä, kun jakaja & Lukumäärä desimaaliluku .

Napsauta sen jälkeen Nappi ajaa VBA koodi.

Siksi saat jäännös sekä desimaalijakaja ja numerot .

On kuitenkin ongelma, että VBA pyöristää desimaali . Tässä tuloksen piti olla 1.75 mutta VBA Mod pyöristettynä 2 .

Aiheeseen liittyvä sisältö: VBA EXP -funktio Excelissä (5 esimerkkiä)

7. VBA Mod pyöristää desimaalilukua suurempi kuin 0,5

Tässä näytän sinulle, miten yhteenveto toimii VBA Mod .

Osoittaakseni teille desimaali piste ongelma, ensin lasken jäännös Excelin avulla MOD toiminto.

Solussa D4 Kirjoita seuraava kaava,

Tässä käytin B6 kuten numero C6 kuin jakaja .

Paina sitten ENTER saadaksesi jäännös ja saat jäännös joka on 7.7 .

Lasketaan nyt VBA Mod , avataksesi VBA Toimittaja seuraa kohdassa 1 selostettuja vaiheita.

Kirjoita sitten seuraava koodi kenttään Moduuli .

 Sub RoundsUp_Number() Dim n As Integer n = Range("B6").Value Mod Range("C6").Value MsgBox Range("B6").Value & " Mod " & Range("C6").Value & " is " & n End Sub 

Täällä aliprosessi Decimal_Both_Divisor_Number, Ilmoitin muuttujan n kuten Kokonaisluku ja käytimme sitä pitämään palautetun arvon Mod operaattori.

Seuraavaksi käytetään soluviittausta B6 kuten numero1 ja C6 kuten number2 (jakaja)

Sitten käytettiin MsgBox näyttää jäännös .

Nyt, Tallenna koodi ja palaa takaisin laskentataulukkoon.

Jos haluat lisätä Nappi noudata kohdassa 1 selostettuja vaiheita.

➤ Nimesin napin RoundsUp Desimaaliluku .

Napsauta sen jälkeen Nappi ajaa VBA koodi.

Siksi saat jäännös käytetylle soluviittaukselle.

Katso tarkkaan jäännös että VBA Mod palasi. MOD funktio samoille arvoille, jotka palautetaan 7.7 mutta VBA Mod operaattori palasi 0 . Kuten VBA pyöristää arvot.

Lue lisää: Kuinka käyttää VBA Round -funktiota Excelissä (6 nopeaa käyttöä)

8. Parillisen tai parittoman luvun määrittäminen

The VBA Mod määrittää myös Jopa tai Odd numero tietystä alueesta.

Avaa VBA editorissa, noudata kohdassa 1 selostettuja vaiheita.

Kirjoita sitten seuraava koodi kenttään Moduuli .

 Sub Determine_Even_Or_Odd() Dim n As Integer For n = Range("B4").Value To Range("B8").Value If n Mod 2 = 0 Then MsgBox n & " on parillinen luku!" Else MsgBox n & " on pariton luku!" End If Next n End Sub 

Täällä ali-proseduuri Determine_Even_Or_Odd, Ilmoitin muuttujan n kuten Kokonaisluku .

Sitten käytin Osoitteessa silmukka, jossa pidin arvon, jonka ilmoitin soluviittauksen kautta.

Seuraavaksi käytin IF funktio, jossa asetan kriteereiksi n Mod 2 = 0 jos arvo on true, se palauttaa arvon Jopa lausunto muuten Odd .

Sitten käytettiin MsgBox näyttää lausunnot .

Nyt, Tallenna koodi ja palaa takaisin laskentataulukkoon.

Jos haluat lisätä Nappi noudata kohdassa 1 selostettuja vaiheita.

➤ Nimesin napin Parillinen tai pariton .

Napsauta sen jälkeen Nappi ajaa VBA koodi.

Näin ollen saat tietää, mikä arvo on Jopa ja mikä niistä on Odd .

Täällä, 1 on Odd numero.

Täällä, 2 on Jopa numero.

Lue lisää: VBA If - Then - Else Statement Excelissä (4 esimerkkiä)

9. Käyttämällä soluväliä VBA-modissa saadaksesi jäännösosan

Voit myös käyttää solualue saadaksesi jäännös käyttämällä VBA Mod .

Avaa VBA editorissa, noudata kohdassa 1 selostettuja vaiheita.

Kirjoita sitten seuraava koodi kenttään Moduuli .

 Sub Get_Reminder_UsingVBA() Dim n As Integer For n = 4 To 9 MsgBox Cells(n, 2).Value Mod Cells(n, 3) Next n End Sub 

Täällä Get_Reminder_UsingVBA-aliprosessi, Ilmoitin muuttujan n kuten Kokonaisluku .

Sitten käytin Osoitteessa silmukka, jossa pidin arvon, jonka ilmoitin soluviittauksen kautta. Silmukka toimii riveillä olevien arvojen osalta. 4 osoitteeseen 9 .

Sitten käytettiin MsgBox näyttää jäännös .

Nyt, Tallenna koodi ja palaa takaisin laskentataulukkoon.

Jos haluat lisätä Nappi noudata kohdassa 1 selostettuja vaiheita.

➤ Nimesin napin Dynaaminen soluviite .

Napsauta sen jälkeen Nappi ajaa VBA koodi.

Siksi saat jäännös kaikille käytetyille arvoille yksi kerrallaan.

Ensimmäinen on tarkoitettu numero 29 jossa jakaja on 3 .

Toinen on tarkoitettu numero -47 jossa jakaja on 5 .

Silmukka toimii, kunnes se saavuttaa rivin 9 . Viides on tarkoitettu numero 59 jossa jakaja on 6 .

Aiheeseen liittyvä sisältö: VBA-toiminnon satunnaistaminen Excelissä (5 esimerkkiä)

Ero Excel MOD & VBA Modin välillä

Vaikka useimmissa tapauksissa palautusarvot ovat samat, kun kyseessä on MOD toiminto ja VBA Mod operaattori, mutta joissakin tapauksissa tulos eroaa toisistaan. Näytän teille, miten ne eroavat toisistaan.

Muistettavat asiat

🔺 Operaattori pyöristää desimaalinen/liukeva pisteitä.

Harjoitusosio

Työkirjassa on harjoituslomake, jonka avulla voit harjoitella näitä selitettyjä esimerkkejä.

Päätelmä

Tässä artikkelissa olen näyttänyt 9 esimerkkiä Excelin VBA Mod operaattorin. Yritin myös käsitellä syitä, joiden vuoksi virheitä näytetään usein. Sekä asioita, jotka sinun on muistettava operaattoria käyttäessäsi. Voit vapaasti kommentoida alla kaikenlaisia kyselyitä ja ehdotuksia.