VBA Mod бол функц биш харин MOD нь Excel-ийн ажлын хуудасны функц юм. VBA Mod нь хоёр тоог хувааж үлдэгдэл -г буцаадаг оператор юм. Мод оператор нь MODULO -ийн богино хэлбэр бөгөөд математикийн үйлдлүүдэд хэрэглэгддэг. Загварын операторууд хөвөгч цэгийг дугуйлдаг .

Энэ нийтлэлд би харуулах болно Excel VBA Mod операторыг ашиглах янз бүрийн жишээг үзүүлэв.

Дадлага хийхийн тулд татаж авах

VBA Mod функцийн үндэс: Дүгнэлт & AMP; Синтакс

Дүгнэлт

VBA Mod оператор нь хоёр тоог хувааж үлдэгдэл -г буцаана. Нэг нь хуваагч өөр нэг нь тоо гэж нэрлэгддэг. Мод оператор нь тоо -г хуваагч -д хуваана.

Синтакс

Number1 Mod Number2 (Divisor)

Аргументууд

Буцах утга

VBA Mod оператор нь үлдэгдлийг буцаана .

Хувилбар

VBA Mod оператор нь Excel 2000 болон түүнээс хойшхи хувилбаруудад боломжтой.

Би Excel Microsoft 365 -г ашиглаж байна.1-р хэсэгт тайлбарлав.

➤ Би товчлуурыг Тэгш эсвэл Сондгой гэж нэрлэсэн.

Үүний дараа Товчлуур дээр дарж <1-г ажиллуулна уу>VBA код.

Тиймээс та аль утга нь Тэгш , аль нь Сондгой болохыг мэдэх болно.

Энд, 1 нь Сондгой тоо.

Энд 2 нь Тэгш дугаар.

Дэлгэрэнгүй унших: VBA If – Дараа нь – Excel дээрх Else мэдэгдэл (4 жишээ)

9.

Үлдсэн үлдэгдлийг авахын тулд VBA Mod-д Cell Range-ийг ашигласнаар та нүдний муж -г ашиглан үлдэгдэл -ийг авах боломжтой. VBA Mod .

VBA редакторыг нээхийн тулд 1-р хэсэгт тайлбарласан алхмуудыг дагана уу.

Дараа нь дараах кодыг бичнэ үү. Модуль .

4035

Энд, Get_Reminder_UsingVBA дэд процедурт Би n хувьсагчийг зарласан. Бүхэл тоо гэж.

Дараа нь би нүдний лавлагаагаар зарласан утгыг хадгалах For хүртэл ашигласан. Энэ давталт нь 4 -аас 9 хүртэлх утгуудад ажиллана.

Дараа нь MsgBox -г ашиглан үлдэгдэл<2-ыг харуулав>.

Одоо Кодыг хадгалаад ажлын хуудас руу буцна уу.

Товчлуур оруулахын тулд 1-р хэсэгт тайлбарласан алхмуудыг дагана уу. .

➤ Би товчлуурыг Динамик эсийн лавлагаа гэж нэрлэсэн.

Үүний дараа Товчлуур дээр дарж VBA<2-г ажиллуулна> код.

Тиймээс та бүх ашигласан утгуудын үлдэгдэл -ийг авах болно.нэгээр.

Эхнийх нь тоо 29 д хуваагч нь 3 байна.

Хоёр дахь нь тоо -47 -д зориулагдсан хуваагч нь 5 .

Голд 9 мөрөнд хүрэх хүртэл ажиллана. Тав дахь нь тоо 59 -д зориулагдсан бөгөөд хуваагч нь 6 байна.

Холбогдох контент: Excel-д VBA Randomize функцийг хэрхэн ашиглах вэ (5 жишээ)

Excel-ийн MOD & AMP хоорондын ялгаа; VBA Mod

Хэдийгээр ихэнх тохиолдолд буцаах утга нь MOD функц ба VBA Mod операторын хувьд ижил байдаг ч зарим тохиолдолд үр дүн гардаг. бие биенээсээ ялгаатай. Би танд тэдгээрийн ялгааг харуулъя.

Санах зүйл

🔺 Оператор аравтын бутархай/хөвөгч цэгийг дугуйруулна.

Дадлага хийх хэсэг

Би эдгээр тайлбарласан жишээнүүдийг дадлагажуулахын тулд ажлын дэвтэрт дадлагын хуудас өгсөн.

Дүгнэлт

Энэ нийтлэлд би Excel VBA Mod операторын 9 жишээг үзүүлэв. Би бас алдаа байнга харуулах шалтгааныг тайлбарлахыг хичээсэн. Операторыг ашиглахдаа санаж байх ёстой зүйлсийн хамт. Ямар ч төрлийн асуулга, санал хүсэлтийг доор комментоор бичээрэй.

Excel-д VBA Mod функцийг ашиглах 9 жишээ

1. Үлдэгдэл авахын тулд VBA Mod ашиглах

Хэрэв та хүсвэл VBA Mod операторыг ашиглан үлдэгдэл .

Би танд процедурыг тайлбарлая,

Эхлэхийн тулд Хөгжүүлэгчийг нээнэ үү. таб >> Visual Basic -г сонгоно уу.

➤ Одоо Microsoft Visual Basic for Applications шинэ цонх гарч ирнэ.

Дараа нь Оруулах >> Модуль

-г сонгоно уу. Одоо Модуль -д дараах кодыг бичнэ үү.

6164

Энд, Get_Reminder дэд процедурт би n хувьсагчийг Бүхэл тоо гэж зарлаж <1-ийн буцаасан утгыг хадгалахад ашигласан>Мод оператор.

Дараа нь MsgBox -г ашиглан үлдэгдэл -г харуулав.

Одоо Хадгалах код оруулаад ажлын хуудас руу буцна уу.

Дахин Хөгжүүлэгч таб >> -аас Оруулах >> Маягтны удирдлагаас

Одоо Товчлуур -г сонгоод Товчийг руу чирнэ үү. тайлбар өгөхийг хүссэн газраа байрлуул.

Дараа нь та товчлуурт нэр өгч болно.

➤ Би үүнийг Сануулагч авах гэж нэрлэсэн.

⏩ Одоо хулгана дээр баруун товшино уу Assign Макро гэсэн контекст цэс гарч ирнэ.

Тэндээс Макро оноох -г сонгоно уу.

⏩ Макро оноох -ын харилцах цонх гарч ирнэ. .

Дараа нь, Макро нэр болон Макро -г сонго.

⏩ Би Макроны нэр -аас Сануулга авах -г сонгоод <1-г сонгосон>VBA Mod.xlsm Macros in -ээс.

Эцэст нь OK дээр дарна уу.

Дараа нь Сануулагч_авах гэсэн товчийг дарна уу.

Тиймээс үлдэгдэл бүхий мессежийн хайрцаг харуулах болно.

Та үүнийг бүх тоо -д хийж үлдэгдэл -ийг авах боломжтой.

Дэлгэрэнгүй унших: Excel дэх VBA форматын функц (8 жишээтэй ашиглах)

2. Үлдсэн хэсгийг авахын тулд VBA Mod-д эсийн лавлагаа ашиглах

Excel хуудасны Үүрэн лавлагаа -г ашигласнаар та VBA Mod -аас үлдэгдэл -г авч болно.

VBA редактор, 1-р хэсэгт тайлбарласан алхмуудыг дагана уу.

Дараа нь Модуль -д дараах кодыг бичнэ үү.

1356

Энд, Reminder_Using_CellReference -д би n хувьсагчийг Бүхэл тоо гэж зарлаж Mod <-ийн буцаасан утгыг хадгалахад ашигласан. 2>оператор.

Дараа нь , нүдний лавлагаа B4 тоо1 , C4 -г тоо2 (хуваагч)

Дараа нь <1-г ашигласан>MsgBox үлдэгдэл -г харуулах.

Одоо Код хадгалаад ажлын хуудас руу буцна уу.

<оруулахын тулд Товч , 1-р хэсэгт тайлбарласан алхмуудыг дагана уу.

➤ Би товчлуурыг Үүрэн лавлагаа гэж нэрлэсэн.

Үүний дараа дээр товшино уу. VBA -г ажиллуулахын тулд товчлууркод.

Тиймээс та ашигласан нүдний лавлагааны үлдэгдэл -ийг авах болно.

Холбогдох контент: Хэрхэн VBA функцийн утгыг буцаах (массив болон массивын бус утгуудын аль аль нь)

3. VBA Mod ашиглан сөрөг тооноос үлдэгдэл авах

VBA Mod нь үлдэгдэл -г тооцоолохдоо сөрөг тоо -г мөн дэмждэг.

VBA <2-г нээх>редактор, 1-р хэсэгт тайлбарласан алхмуудыг дагана уу.

Дараа нь Модуль -д дараах кодыг бичнэ үү.

7202

Энд , Reminder_From_NegativeNumber, -д би n хувьсагчийг Бүхэл тоо гэж зарлаж Mod операторын буцаасан утгыг хадгалахад ашигласан.

Дараа нь B5 нүдний лавлагааг тоо1 , C5 -г тоо2 (хуваагч)

болгон ашигласан. Дараа нь MsgBox -г ашиглан үлдэгдэл -г харуулав.

Одоо кодоо хадгалаад ажлын хуудас руу буцна уу.

Товчийг оруулахын тулд 1-р хэсэгт тайлбарласан алхмуудыг дагана уу.

➤ Би th-ийг нэрлэсэн. e товчлуур Сөрөг тооноос сануулах .

Үүний дараа Товчлуур дээр дарж VBA кодыг ажиллуулна уу.

Тиймээс та сөрөг тоо -д үлдэгдэл -г авах болно.

Дэлгэрэнгүй унших: VBA IsNumeric функцийг хэрхэн ашиглах вэ (9 жишээ)

4. VBA Mod ашиглан нүдэнд үлдэгдэл авах

үлдэгдэл харуулахын оронд -аар дамжуулан msg хайрцаг та үүнийг VBA MOD функцийг ашиглан нүдэнд байрлуулж болно.

VBA -г нээх засварлагчийн хувьд 1-р хэсэгт тайлбарласан алхмуудыг дагана уу.

Дараа нь Модуль -д дараах кодыг бичнэ үү.

7692

Энд, s ub-procedure Reminder_in_Cell -д би ActiveCell.FormulaR1C1 форматыг ашиглан ActiveCell -ийн байрлалыг авсан.

Дараа нь MOD функцийг ашиглан үлдэгдэл -г авсан.

Мөн Select аргыг ашигласан.

Одоо , кодоо хадгалаад ажлын хуудас руу буцна уу.

Товч болон тогтоох -г оруулахын тулд VBA код. 1-р хэсэгт тайлбарласан алхмуудыг дагана уу.

➤ Би товчлуурыг Нүдэн дэх сануулагч гэж нэрлэсэн.

Дараа нь D4 нүдийг сонгоно уу.

Дараа нь Товчлуур дээр дарж VBA кодыг ажиллуулна уу.

Үүний үр дүнд та дараах зүйлийг авах болно. Сонгосон нүдэн дэх үлдэгдэл .

Ижил процессыг дагаснаар та үлдсэн хэсэгт үлдэгдэл -г авах болно. тоо.

Дэлгэрэнгүй унших: Excel VBA (Бүрэн заавар) дээр MsgBox функцийг хэрхэн ашиглах талаар

5. VBA Mod-г бүхэл тоо хуваагч & Хөвөгч тоо

Хэрэв таны хуваагч бүхэл тоо төрөл боловч таны тоо хөвөгч -д байгаа бол гэж бичээд VBA Mod операторыг ашиглаж болно.

VBA редакторыг нээхийн тулд хэсэгт тайлбарласан алхмуудыг дагана уу.1.

Дараа нь Модуль -д дараах кодыг бичнэ үү.

5231

Энд, R eminder_From_Recimal_Number дэд хэсэгт -procedure, Би n хувьсагчийг Бүхэл тоо гэж зарлаж Mod операторын буцаасан утгыг хадгалахад ашигласан.

Дараа нь B5 нүдний лавлагааг тоо1 болгон C5 -г тоо2 (хуваагч)

Дараа нь MsgBox үлдэгдэл -г харуулахын тулд.

Одоо Кодыг хадгаж, ажлын хуудас руу буцна уу.

Оруулахын тулд Товч , 1-р хэсэгт тайлбарласан алхмуудыг дагана уу.

➤ Би товчлуурыг Аравтын тооноос сануулах гэж нэрлэсэн.

Үүний дараа VBA кодыг ажиллуулахын тулд товчлуур.

Тиймээс та аравтын тооны үлдэгдэл -г авах болно.

Гэхдээ VBA аравтын -г дугуйлдаг асуудал байна. Энд үр дүн нь 2.25 байх ёстой байсан ч VBA Mod үүнийг 2 болгож дугуйлсан.

аравтын тоо байгаа эсэхийг санаарай. хөвөгч цэг нь VBA Mod -д 0.5 -ээс их байвал дээш дараагийн бүхэл тоонд хүрнэ.

Хэрэв энэ нь VBA Mod -д 0.5 -ээс бага бол одоо байгаа бүхэл тоон утга руу дээш бөөрөнхийлөнө .

Унших Дэлгэрэнгүй: Excel дээр VBA Int функцийг хэрхэн ашиглах талаар ( 3 жишээ)

Ижил төстэй уншилтууд:

• Excel VBA дээр IsNull функцийг хэрхэн ашиглах вэ (5Жишээ)
• Excel-д VBA Str функцийг ашиглах (4 жишээ)
• VBA шилжүүлэгч функцийг хэрхэн ашиглах талаар (6 тохиромжтой жишээ)
• Excel-д VBA Len функцийг ашиглах (4 жишээ)
• Excel хуудасны хуулбарыг хэрхэн арилгах (7 арга)

6. Хуваагч & AMP үед VBA Mod ашиглах; Тоо хоёулаа аравтын орон

Хэрэв таны хуваагч болон тоо хоёулаа аравтын/хөвөгч төрөлд байгаа бол та мөн VBA Mod оператор.

VBA редакторыг нээхийн тулд 1-р хэсэгт тайлбарласан алхмуудыг дагана уу.

Дараа нь дараах кодыг бичнэ үү. Модуль .

6860

Энд, Аравтын_Хоёулаа_Хуваагч_тоо дэд процедурт Би n хувьсагчийг зарласан. Бүхэл тоо болон Mod операторын буцаасан утгыг хадгалахад ашигласан.

Дараа нь B5 нүдний лавлагааг болгон ашигласан. тоо1 ба С5 тоо2 (хуваагч)

Дараа нь Үлдсэн -г харуулахын тулд MsgBox -г ашигласан.

Одоо Кодыг хадгалаад ажлын хуудас руу буцна уу.

Товчлуурыг оруулахын тулд 1-р хэсэгт тайлбарласан алхмуудыг дагана уу.

➤ Би товчлуурыг Авах Хуваагч & Аравтын тоо .

Үүний дараа Товчлуур дээр дарж VBA кодыг ажиллуулна.

Тиймээс та < аравтын хуваагч ба тоо хоёуланд нь 1>үлдэгдэл байна.

Гэхдээ нэг асуудал байна. VBA аравтын -г дугуйруулна. Энд үр дүн нь 1.75 байх ёстой байсан ч VBA Mod үүнийг 2 болгож дугуйлсан.

Холбогдох контент: Excel дээрх VBA EXP функц (5 жишээ)

7. 0.5-аас их аравтын тоог дугуйлах VBA мод

Энд би VBA Mod -д бөглөх хэрхэн ажилладгийг харуулна уу.

Танд аравтын цэгийн бодлогыг харуулахын тулд эхлээд би тооцоолно. Excel MOD функцийг ашиглан үлдэгдэл .

D4 нүдэнд дараах томьёог бичнэ үү,

Энд би В6 -г С6 -г хуваагч болгон ашигласан.

Дараа нь, ENTER -г дарж үлдэгдэл -ийг авах бөгөөд та үлдэгдэл -г авах бөгөөд энэ нь 7.7 болно.

Одоо VBA Mod -ээр тооцоолж, VBA редакторыг нээхийн тулд 1-р хэсэгт тайлбарласан алхмуудыг дагана уу.

Дараа нь Модуль -д дараах кодыг бичнэ үү.

1723

Энд, Аравтын_Хоёулаа_Хуваагч_тоо дэд процедурын Би зарласан хувьсагч e n Бүхэл тоо болон Mod операторын буцаасан утгыг хадгалахад ашигласан.

Дараа нь нүдний лавлагааг ашигласан. B6 тоо1 ба C6 тоо2 (хуваагч)

Дараа нь MsgBox -г харуулахын тулд ашигласан. үлдэгдэл .

Одоо Код хадгалаад ажлын хуудас руу буцна уу.

Товчлуур оруулахын тулд дараахыг дагана уу. нь1-р хэсэгт тайлбарласан алхмууд.

➤ Би товчлуурыг РoundsUp Аравтын тоо гэж нэрлэсэн.

Үүний дараа Товчлуур дээр товшоод VBA код.

Тиймээс та ашигласан нүдний лавлагааны үлдэгдэл -г авах болно.

Болгоомжтой харна уу. VBA Mod буцаж ирсэн үлдэгдэл . Ижил утгуудын MOD функц нь 7.7 -г буцаасан боловч VBA Mod оператор 0 -г буцаалаа. VBA утгуудыг бөөрөнхийлсөн тул.

Дэлгэрэнгүй унших: Excel-д VBA Round функцийг хэрхэн ашиглах талаар (6 хурдан хэрэглээ)

8. Тэгш эсвэл сондгой тоог тодорхойлох

VBA горим мөн Тэгш эсвэл Сондгой тоог тодорхойлно. өгөгдсөн мужаас.

VBA редакторыг нээхийн тулд 1-р хэсэгт тайлбарласан алхмуудыг дагана уу.

Дараа нь Модуль<-д дараах кодыг бичнэ үү. 2>.

9106

Энд Тэгш_Од_Од_тогтоох дэд процедурт би n хувьсагчийг Бүтэн тоо гэж зарласан. .

Дараа нь би нүдний лавлагаагаар зарласан утгыг хадгалсан For гогцоог ашигласан.

Дараа нь би IF ашигласан. хэрэв би шалгуурыг n Mod 2 = 0 гэж тохируулсан функц нь хэрэв утга нь үнэн бол энэ нь Тэгш мэдэгдлийг буцаана, эс бөгөөс Сондгой .

Дараа нь MsgBox -г ашиглан мэдэгдэл -ийг үзүүлэв.

Одоо кодоо хадгалаад ажлын хуудас руу буцна уу.

Товчлуур оруулахын тулд алхмуудыг дагана уу