Daftar Isi
The VBA Mod bukanlah sebuah fungsi, sedangkan MOD adalah fungsi dalam lembar kerja Excel. VBA Mod adalah operator yang membagi dua bilangan dan mengembalikan sisa Operator Mod adalah bentuk singkat dari MODULO yang digunakan dalam operasi matematika. Mod operator mengumpulkan yang titik mengambang .
Dalam artikel ini, saya akan menunjukkan kepada Anda berbagai contoh penggunaan Excel VBA Mod operator.
Unduh untuk Berlatih
Contoh Operator VBA Mod.xlsmDasar-dasar Fungsi Mod VBA: Ringkasan &; Sintaksis
Ringkasan
The VBA Mod operator membagi dua bilangan dan mengembalikan sisa . di mana seseorang dikenal sebagai pembagi yang lain adalah nomor . Mod operator membagi nomor oleh pembagi .
Sintaksis
Angka1 Mod Angka2 (Pembagi)
Argumen
Argumen | Wajib / Pilihan | Penjelasan |
---|---|---|
Nomor1 | Diperlukan | Ini adalah numerik ekspresi |
Nomor2 | Diperlukan | Ini adalah numerik ekspresi |
Nilai Pengembalian
The VBA Mod operator mengembalikan sebuah sisa .
Versi
The VBA Mod operator tersedia untuk Excel 2000 dan yang lebih baru.
Saya menggunakan Excel Microsoft 365 untuk mengimplementasikan contoh-contoh ini.
9 Contoh Penggunaan Fungsi VBA Mod di Excel
1. Menggunakan Mod VBA untuk Mendapatkan Sisa
Jika Anda mau, Anda bisa mendapatkan sisa dengan menggunakan VBA Mod operator.
Izinkan saya menjelaskan prosedurnya kepada Anda,
Untuk memulainya, buka Pengembang tab>> pilih Visual Basic .
Sekarang, jendela baru Microsoft Visual Basic untuk Aplikasi akan muncul.
Selanjutnya, dari Sisipkan >>> pilih Modul
Sekarang, ketikkan kode berikut ini di dalam Modul .
Sub Get_Reminder() Dim n As Integer n = 29 Mod 3 MsgBox " 29 Mod 3 adalah " & n End Sub
Di sini, di Get_Reminder sub prosedur, saya mendeklarasikan variabel n sebagai Bilangan bulat dan menggunakannya untuk menyimpan nilai yang dikembalikan dari Mod operator.
Kemudian menggunakan MsgBox untuk menunjukkan sisa .
Sekarang, Simpan kode dan kembali ke lembar kerja.
Sekali lagi, buka Pengembang tab>> dari Sisipkan >>> pilih Tombol dari Kontrol Formulir
Sekarang, Seret yang Tombol untuk menempatkannya di tempat yang ingin Anda berikan keterangan.
Berikutnya, Anda bisa memberi nama pada tombol.
➤ Saya menamainya Dapatkan Pengingat .
⏩ Sekarang, klik kanan pada mouse menu konteks dari Tetapkan Makro akan muncul.
Dari sana pilih Tetapkan Makro .
⏩ A kotak dialog dari Tetapkan Makro akan muncul.
Kemudian, pilih Nama makro dan Makro dalam .
⏩ Saya memilih Get_Reminder dari Nama makro dan dipilih VBA Mod.xlsm dari Makro dalam .
Terakhir, klik OK .
Kemudian, klik pada tombol bernama Get_Reminder .
Oleh karena itu, ini akan menunjukkan kotak msg dengan sisa .
Anda bisa melakukannya untuk semua angka untuk mendapatkan sisa .
Baca lebih lanjut: Fungsi Format VBA di Excel (8 Penggunaan dengan Contoh)
2. Menggunakan Referensi Sel dalam Mod VBA untuk Mendapatkan Sisa
Dengan menggunakan Referensi Sel dari lembar Excel, Anda bisa mendapatkan sisa dari VBA Mod .
Untuk membuka VBA editor, ikuti langkah-langkah yang dijelaskan di bagian 1.
Kemudian, ketikkan kode berikut ini di dalam Modul .
Sub Pengingat_Menggunakan_Referensi_sel() Dim n As Integer n = Range("B4").Value Mod Range("C4").Value MsgBox Range("B4").Value & " Mod " & Range("C4").Value & " adalah " & n End Sub
Di sini, di Pengingat_Menggunakan_Referensi_sel , saya mendeklarasikan variabel n sebagai Bilangan bulat dan menggunakannya untuk menyimpan nilai yang dikembalikan dari Mod operator.
Berikutnya, menggunakan referensi sel B4 sebagai nomor1 dan C4 sebagai number2 (pembagi)
Kemudian menggunakan MsgBox untuk menunjukkan sisa .
Sekarang, Simpan kode dan kembali ke lembar kerja.
Untuk menyisipkan Tombol ikuti langkah-langkah yang dijelaskan di bagian 1.
➤ Saya menamai tombol itu Referensi Sel .
Setelah itu, klik pada Tombol untuk menjalankan VBA kode.
Oleh karena itu, Anda akan mendapatkan sisa untuk referensi sel yang digunakan.
Konten Terkait: Cara Mengembalikan Nilai dalam Fungsi VBA (Baik Nilai Array dan Non-Array)
3. Menggunakan VBA Mod untuk Mendapatkan Sisa dari Angka Negatif
The VBA Mod juga mendukung negatif angka sambil menghitung sisa .
Untuk membuka VBA editor, ikuti langkah-langkah yang dijelaskan di bagian 1.
Kemudian, ketikkan kode berikut ini di dalam Modul .
Sub Pengingat_Dari_Nomor_Negatif() Dim n As Integer n = Range("B5").Value Mod Range("C5").Value MsgBox Range("B5").Value & " Mod " & Range("C5").Value & " adalah " & n End Sub
Di sini, di Pengingat_Dari_Nomor_Negatif, Saya mendeklarasikan variabel n sebagai Bilangan bulat dan menggunakannya untuk menyimpan nilai yang dikembalikan dari Mod operator.
Berikutnya, menggunakan referensi sel B5 sebagai nomor1 dan C5 sebagai number2 (pembagi)
Kemudian menggunakan MsgBox untuk menunjukkan sisa .
Sekarang, Simpan kode dan kembali ke lembar kerja.
Untuk menyisipkan Tombol, ikuti langkah-langkah yang dijelaskan di bagian 1.
➤ Saya menamai tombol itu Pengingat Dari Angka Negatif .
Setelah itu, klik pada Tombol untuk menjalankan VBA kode.
Oleh karena itu, Anda akan mendapatkan sisa untuk angka negatif .
Baca selengkapnya: Cara Menggunakan Fungsi VBA IsNumeric (9 Contoh)
4. Menggunakan Mod VBA untuk Mendapatkan Sisa di Sel
Alih-alih menunjukkan sisa melalui msg kotak Anda dapat menempatkannya dalam sel dengan menggunakan VBA MOD fungsi.
Untuk membuka VBA editor, ikuti langkah-langkah yang dijelaskan di bagian 1.
Kemudian, ketikkan kode berikut ini di dalam Modul .
Sub Pengingat_in_Cell() ActiveCell.FormulaR1C1 = "=MOD(RC[-2],RC[-1])" Range("D4").Select End Sub
Di sini, di s ub-prosedur Pengingat_dalam_sel , saya menggunakan ActiveCell.FormulaR1C1 format untuk mendapatkan posisi ActiveCell .
Kemudian, menggunakan MOD berfungsi untuk mendapatkan sisa .
Juga, menggunakan Pilih metode.
Sekarang, Simpan kode dan kembali ke lembar kerja.
Untuk menyisipkan Tombol dan menetapkan yang VBA ikuti langkah-langkah yang dijelaskan di bagian 1.
➤ Saya menamai tombol itu Pengingat di Sel .
Berikutnya, pilih D4 sel.
Kemudian, klik pada Tombol untuk menjalankan VBA kode.
Sebagai hasilnya, Anda akan mendapatkan sisa dalam sel yang dipilih.
Dengan mengikuti proses yang sama, Anda akan mendapatkan sisa untuk angka-angka lainnya.
Baca selengkapnya: Cara Menggunakan Fungsi MsgBox di Excel VBA (Panduan Lengkap)
5. Menggunakan VBA Mod dengan Pembagi Bilangan Bulat &; Bilangan Float
Jika Anda pembagi adalah bilangan bulat jenis, tetapi nomor ada di mengapung maka Anda dapat menggunakan VBA Mod operator.
Untuk membuka VBA editor, ikuti langkah-langkah yang dijelaskan di bagian 1.
Kemudian, ketikkan kode berikut ini di dalam Modul .
Sub Pengingat_Dari_Bilangan_Desimal_Nomor() Dim n As Integer n = Range("B5").Value Mod Range("C5").Value MsgBox Range("B5").Value & " Mod " & Range("C5").Value & " adalah " & n End Sub
Di sini, di R sub-prosedur eminder_From_Decimal_Number, Saya mendeklarasikan variabel n sebagai Bilangan bulat dan menggunakannya untuk menyimpan nilai yang dikembalikan dari Mod operator.
Berikutnya, menggunakan referensi sel B5 sebagai nomor1 dan C5 sebagai number2 (pembagi)
Kemudian menggunakan MsgBox untuk menunjukkan sisa .
Sekarang, Simpan kode dan kembali ke lembar kerja.
Untuk menyisipkan Tombol ikuti langkah-langkah yang dijelaskan di bagian 1.
➤ Saya menamai tombol itu Pengingat Dari Angka Desimal .
Setelah itu, klik pada Tombol untuk menjalankan VBA kode.
Oleh karena itu, Anda akan mendapatkan sisa untuk angka desimal .
Tetapi ada masalah yang VBA membulatkan yang desimal Di sini, hasilnya seharusnya 2.25 tetapi VBA Mod membulatkannya menjadi 2 .
Ingatlah jika ada desimal/mengambang titik lebih besar dari 0.5 di VBA Mod maka itu akan menjadi dibulatkan ke nilai bilangan bulat berikutnya.
Jika kurang dari 0.5 di VBA Mod , maka akan menjadi dibulatkan ke nilai integer yang ada.
Baca selengkapnya: Cara Menggunakan Fungsi VBA Int di Excel (3 Contoh)
Bacaan serupa:
- Cara Menggunakan Fungsi IsNull di Excel VBA (5 Contoh)
- Gunakan Fungsi VBA Str di Excel (4 Contoh)
- Cara Menggunakan Fungsi Sakelar VBA (6 Contoh yang Sesuai)
- Gunakan Fungsi VBA Len di Excel (4 Contoh)
- Cara Menghapus Duplikat di Lembar Excel (7 Metode)
6. Menggunakan VBA Mod Ketika Pembagi &; Angka Keduanya Desimal
Jika Anda pembagi dan nomor keduanya berada di desimal/float maka Anda juga bisa menggunakan VBA Mod operator.
Untuk membuka VBA editor, ikuti langkah-langkah yang dijelaskan di bagian 1.
Kemudian, ketikkan kode berikut ini di dalam Modul .
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
Di sini, di sub-prosedur Desimal_Kedua_Bilangan_Pembagi_Nomor, Saya mendeklarasikan variabel n sebagai Bilangan bulat dan menggunakannya untuk menyimpan nilai yang dikembalikan dari Mod operator.
Berikutnya, menggunakan referensi sel B5 sebagai nomor1 dan C5 sebagai number2 (pembagi)
Kemudian menggunakan MsgBox untuk menunjukkan sisa .
Sekarang, Simpan kode dan kembali ke lembar kerja.
Untuk menyisipkan Tombol, ikuti langkah-langkah yang dijelaskan di bagian 1.
➤ Saya menamai tombol itu Dapatkan Pengingat Dari Ketika Pembagi &; Angka Desimal .
Setelah itu, klik pada Tombol untuk menjalankan VBA kode.
Oleh karena itu, Anda akan mendapatkan sisa untuk keduanya pembagi desimal dan angka .
Tetapi ada masalah yang VBA membulatkan desimal Di sini, hasilnya seharusnya 1.75 tetapi VBA Mod membulatkannya menjadi 2 .
Konten Terkait: Fungsi VBA EXP di Excel (5 Contoh)
7. VBA Mod untuk Membulatkan Angka Desimal Lebih Besar Dari 0,5
Di sini, saya akan menunjukkan kepada Anda bagaimana mengumpulkan bekerja di VBA Mod .
Untuk menunjukkan kepada Anda desimal masalah titik, pertama-tama saya akan menghitung sisa menggunakan Excel MOD fungsi.
Di dalam sel D4 , ketikkan rumus berikut ini,
=MOD(B6, C6)
Di sini, saya menggunakan B6 sebagai nomor C6 sebagai pembagi .
Kemudian, tekan MASUK untuk mendapatkan sisa dan Anda akan mendapatkan sisa yang akan 7.7 .
Sekarang, mari kita hitung melalui VBA Mod , untuk membuka VBA editor mengikuti langkah-langkah yang dijelaskan di bagian 1.
Kemudian, ketikkan kode berikut ini di dalam Modul .
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
Di sini, di sub-prosedur Desimal_Kedua_Bilangan_Pembagi_Nomor, Saya mendeklarasikan variabel n sebagai Bilangan bulat dan menggunakannya untuk menyimpan nilai yang dikembalikan dari Mod operator.
Berikutnya, menggunakan referensi sel B6 sebagai nomor1 dan C6 sebagai number2 (pembagi)
Kemudian menggunakan MsgBox untuk menunjukkan sisa .
Sekarang, Simpan kode dan kembali ke lembar kerja.
Untuk menyisipkan Tombol ikuti langkah-langkah yang dijelaskan di bagian 1.
➤ Saya menamai tombol itu Membulatkan Angka Desimal .
Setelah itu, klik pada Tombol untuk menjalankan VBA kode.
Oleh karena itu, Anda akan mendapatkan sisa untuk referensi sel yang digunakan.
Perhatikan dengan saksama pada sisa bahwa VBA Mod kembali. MOD untuk nilai yang sama yang dikembalikan 7.7 tetapi VBA Mod operator yang dikembalikan 0 . sebagai VBA membulatkan nilai.
Baca selengkapnya: Cara Menggunakan Fungsi Putaran VBA di Excel (6 Penggunaan Cepat)
8. Menentukan Angka Genap atau Ganjil
The VBA Mod juga menentukan Bahkan atau Ganjil angka dari kisaran yang diberikan.
Untuk membuka VBA editor, ikuti langkah-langkah yang dijelaskan di bagian 1.
Kemudian, ketikkan kode berikut ini di dalam Modul .
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 & " adalah bilangan genap!" Else MsgBox n & " adalah bilangan ganjil!" End If Next n End Sub
Di sini, di sub-prosedur Tentukan_Bahkan_Atau_Tambah, Saya mendeklarasikan variabel n sebagai Bilangan bulat .
Kemudian, saya menggunakan Untuk loop di mana saya menyimpan nilai yang saya deklarasikan melalui referensi sel.
Selanjutnya, saya menggunakan JIKA di mana saya menetapkan kriteria sebagai n Mod 2 = 0 jika nilainya benar maka akan mengembalikan sebuah Bahkan pernyataan sebaliknya Ganjil .
Kemudian menggunakan MsgBox untuk menunjukkan pernyataan .
Sekarang, Simpan kode dan kembali ke lembar kerja.
Untuk menyisipkan Tombol ikuti langkah-langkah yang dijelaskan di bagian 1.
➤ Saya menamai tombol itu Genap atau Ganjil .
Setelah itu, klik pada Tombol untuk menjalankan VBA kode.
Oleh karena itu, Anda akan mengetahui nilai mana yang Bahkan dan yang mana yang Ganjil .
Di sini, 1 adalah Ganjil nomor.
Di sini, 2 adalah Bahkan nomor.
Baca selengkapnya: Pernyataan VBA If - Then - Else di Excel (4 Contoh)
9. Menggunakan Rentang Sel dalam Mod VBA untuk Mendapatkan Sisa
Anda juga bisa menggunakan rentang sel untuk mendapatkan sisa dengan menggunakan VBA Mod .
Untuk membuka VBA editor, ikuti langkah-langkah yang dijelaskan di bagian 1.
Kemudian, ketikkan kode berikut ini di dalam Modul .
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
Di sini, di Sub-prosedur Get_Reminder_UsingVBA, Saya mendeklarasikan variabel n sebagai Bilangan bulat .
Kemudian, saya menggunakan Untuk loop di mana saya menyimpan nilai yang saya deklarasikan melalui referensi sel. Loop akan bekerja untuk nilai dari baris 4 untuk 9 .
Kemudian menggunakan MsgBox untuk menunjukkan sisa .
Sekarang, Simpan kode dan kembali ke lembar kerja.
Untuk menyisipkan Tombol ikuti langkah-langkah yang dijelaskan di bagian 1.
➤ Saya menamai tombol itu Referensi Sel Dinamis .
Setelah itu, klik pada Tombol untuk menjalankan VBA kode.
Oleh karena itu, Anda akan mendapatkan sisa untuk semua nilai yang digunakan satu per satu.
Yang pertama adalah untuk nomor 29 di mana pembagi adalah 3 .
Yang kedua adalah untuk nomor -47 di mana pembagi adalah 5 .
Perulangan akan bekerja hingga mencapai baris 9 Yang kelima adalah untuk nomor 59 di mana pembagi adalah 6 .
Konten Terkait: Cara Menggunakan Fungsi Acak VBA di Excel (5 Contoh)
Perbedaan Antara Excel MOD &; VBA Mod
Meskipun untuk sebagian besar kasus, nilai yang dikembalikan sama untuk MOD fungsi dan VBA Mod namun untuk beberapa kasus, hasilnya berbeda satu sama lain. Mari saya tunjukkan perbedaan di antara keduanya.
MOD Fungsi | VBA Mod Operator |
---|---|
The MOD fungsi mengembalikan keduanya Bilangan bulat dan Desimal angka. | Mod operator hanya mengembalikan Bilangan bulat angka. |
Saat menggunakan negatif nomor dalam MOD tidak mengembalikan tanda negatif . | Ini mendukung negatif angka dan kemudian mengembalikan tanda negatif . |
Hal-hal yang Perlu Diingat
🔺 Operator akan mengumpulkan desimal/mengambang poin.
Bagian Latihan
Saya telah menyediakan lembar latihan dalam buku kerja untuk mempraktikkan contoh-contoh yang telah dijelaskan ini.
Kesimpulan
Dalam artikel ini, saya telah menunjukkan 9 contoh Excel VBA Mod Saya juga mencoba untuk membahas alasan-alasan mengapa sering terjadi kesalahan. Bersamaan dengan hal-hal yang perlu Anda ingat saat menggunakan operator. Jangan ragu untuk berkomentar di bawah ini untuk segala jenis pertanyaan dan saran.