MOD VBA

Pengendali MOD Excel VBA

Dalam VBA MOD sama seperti aplikasi dalam matematik, apabila nombor dibahagi oleh pembahagi dan kita mendapat peringatan dari bahagian itu, fungsi ini digunakan untuk memberi kita yang tinggal dari bahagian, itu bukan fungsi di VBA daripada itu pengendali.

MOD tidak lain hanyalah MODULO adalah operasi matematik. Ia sama persis dengan pembahagian tetapi hasilnya sedikit berbeza di mana pembahagian mengambil jumlah yang dibahagi tetapi MOD mengambil bahagian yang lain. Sebagai contoh: Jika anda membahagikan 21 dengan 2 hasil pembahagian adalah 10.50 dengan MOD adalah selebihnya dari pembahagian iaitu 1. (Nombor 2 dapat membahagi hanya 20, bukan 21, maka selebihnya adalah 1).

Dalam excel normal, itu adalah fungsi tetapi di VBA itu bukan fungsi, itu hanya pengendali matematik. Dalam artikel ini, kami akan melihat pengendali ini secara terperinci.

Sintaks

Hanya untuk mengingatkan anda bahawa ini bukan fungsi untuk mempunyai sintaks. Untuk pemahaman pembaca, izinkan saya memasukkannya ke dalam perkataan.

 Nombor 1 MOD Nombor 2 (Pembahagi) 

Nombor 1 tidak lain hanyalah nombor yang cuba kita bahagikan.

Nombor 2 ini adalah pembahagi iaitu kita akan membahagikan Nombor 1 dengan pembahagi ini.

MOD hasil yang diberikan oleh Nombor 1 / Nombor 2.

Bagaimana cara menggunakan MOD dalam VBA?

Anda boleh memuat turun Templat Fungsi MOD VBA ini di sini - Templat Fungsi MOD VBA

Contoh # 1

Ikuti langkah di bawah untuk menulis kod.

Langkah 1: Buat nama makro.

Kod:

 Sub MOD_Contoh1 () Sub Akhir 

Langkah 2: Tentukan salah satu pemboleh ubah sebagai " Integer ".

Kod:

 Sub MOD_Contoh1 () Dim i Sebagai Sub End Integer 

Langkah 3: Sekarang lakukan pengiraan sebagai “i = 20 MOD 2”

Seperti yang saya katakan, pada mulanya, MOD adalah pengendali, bukan fungsi. Oleh itu, saya telah menggunakan perkataan MOD seperti bagaimana saya memasukkan tambah (+).

Kod:

 Sub MOD_Contoh1 () Dim i As Integer i = 21 Mod 2 Akhir Sub 

Langkah 4: Sekarang tetapkan nilai "I" ke kotak mesej.

Kod:

 Sub MOD_Contoh1 () Dim i As Integer i = 21 Mod 2 MsgBox i End Sub 

Langkah 5: Jalankan kotak mesej kod akan menunjukkan nilai "I".

Contoh # 2

Mod dalam vba selalu mengembalikan nilai bulat iaitu tanpa perpuluhan jika anda memberikan nombor dalam perpuluhan. Contohnya, lihat kod di bawah.

Kod:

 Sub MOD_Contoh2 () Dim i As Integer i = 26.25 Mod 3 MsgBox i End Sub 

Pembahagi 3 dapat membahagi 24 jadi selebihnya di sini ialah 2.25 tetapi pengendali MOD mengembalikan nilai integer iaitu 2, bukan 2.25.

Sekarang saya akan mengubah nombor menjadi 26.51 dan melihat perbezaannya.

Kod:

 Sub MOD_Contoh2 () Dim i As Integer i = 26.51 Mod 3 MsgBox i End Sub 

Saya akan menjalankan kod ini dan melihat hasilnya.

Wah !!! Kami mendapat nol sebagai jawapannya. Sebabnya kita mendapat sifar kerana VBA membundarkan nombor seperti yang dilakukan oleh bankir kita iaitu sebarang titik perpuluhan yang lebih besar daripada 0.5 akan dibundarkan ke nilai integer seterusnya. Jadi dalam kes ini 26.51 dibundarkan hingga 27.

Oleh kerana 3 dapat membahagi 27 dengan 9, kita tidak akan mendapat nilai selebihnya, jadi nilai i sama dengan sifar.

Sekarang saya akan memberikan nilai pembahagi juga dalam titik perpuluhan.

Kod:

 Sub MOD_Contoh2 () Dim i As Integer i = 26.51 Mod 3.51 MsgBox i End Sub 

Langkah 6: Jalankan kod ini dan lihat hasilnya.

Kami mendapat 3 sebagai jawapan kerana 26.51 akan dibundarkan hingga 27 dan nilai pembahagi 3.51 akan dibundarkan hingga 4.

Jadi jika anda membahagikan 27 dengan 4 selebihnya adalah 3.

Fungsi MOD Excel vs Pengendali MOD VBA

Langkah 1:  Sekarang lihat perbezaan antara pengendali excel dan VBA MOD. Saya mempunyai nilai 54.24 dan nilai pembahagi adalah 10.

Langkah 2:  Sekarang jika saya menggunakan fungsi MOD, saya akan mendapat hasilnya seperti 4.25.

Langkah 3:  Tetapi jika anda melakukan operasi yang sama dengan VBA, kami akan mendapat 4 sebagai baki, bukan 4.25.

Kod:

 Sub MOD_Contoh2 () Dim i As Integer i = 54.25 Mod 10 MsgBox i End Sub 

Langkah 4:  Jalankan kod ini dan lihat hasilnya.

Perkara yang Perlu Diingat

  • Ia bukan fungsi tetapi ia adalah pengendali aritmetik.
  • Ini adalah membundarkan dan membundarkan nilai perpuluhan tidak seperti fungsi MOD dalam fungsi lembaran kerja.