VBA Logis Operator: DAN, ATAU, TIDAK, JIKA TIDAK di Excel VBA
Excel VBA Logis Operatorso
Misalnya, Anda ingin memproses pesanan pelanggan. Untuk itu, Anda perlu memeriksa terlebih dahulu apakah produk yang dipesan ada atau tidak. Jika ada, Anda juga perlu memeriksa apakah jumlah yang tersedia cukup. Operator logika berguna dalam kasus seperti ini. Operator logika digunakan untuk mengevaluasi lebih dari satu kondisi.
Operator logika utama Excel VBA AND, OR, NOT tercantum dalam tabel di bawah ini:
S / N | Operator | Description | Example | Keluaran |
---|---|---|---|---|
1 | DAN | AND: Ini digunakan untuk menggabungkan lebih dari satu kondisi. Jika semua kondisi benar, AND bernilai benar. Jika salah satu kondisinya salah, DAN bernilai salah | Jika benar = benar DAN salah = benar MAKA | palsu |
2 | OR | OR: Ini digunakan untuk menggabungkan lebih dari satu kondisi. Jika salah satu kondisi bernilai benar, OR mengembalikan nilai benar. Jika semuanya salah, OR mengembalikan salah | Jika benar = benar ATAU benar = salah MAKA | benar |
3 | JANGAN | BUKAN: Yang ini berfungsi seperti fungsi invers. Jika kondisinya benar, maka hasilnya salah, dan jika kondisinya salah, maka hasilnya benar. | Jika TIDAK (benar) Maka | palsu |
VBA Logis OperaTor Contoh Kode Sumber
Demi menyederhanakannya, kami akan membandingkan angka-angka yang dikodekan secara keras.
Tambahkan tombol ActiveX ke lembar dari “Opsi sisipkan.”
Atur properti seperti yang ditunjukkan pada gambar di bawah
Tabel berikut menunjukkan properti yang perlu Anda ubah dan nilai yang perlu Anda perbarui juga.
S / N | kontrol | Milik | Nilai |
---|---|---|---|
1 | Tombol Perintah1 | Nama | btnDAN |
Keterangan | DAN Operauntuk (0 = 0) | ||
2 | Tombol Perintah2 | Nama | btnOR |
Keterangan | OR Operauntuk (1 = 1) Atau (5 = 0) | ||
3 | Tombol Perintah3 | Nama | tapi TIDAK |
Keterangan | JANGAN Operauntuk Tidak (0 = ) |
Tambahkan kode berikut ke btnAND_Click
Private Sub btnAND_Click() If (1 = 1) And (0 = 0) Then MsgBox "AND evaluated to TRUE", vbOKOnly, "AND operator" Else MsgBox "AND evaluated to FALSE", vbOKOnly, "AND operator" End If End Sub
VBA Jika DAN Operator
- “Jika (1 = 1) Dan (0 = 0) Maka” Pernyataan if menggunakan operator logika AND untuk menggabungkan dua kondisi (1 = 1) dan (0 = 0). Jika kedua kondisi benar, kode di atas kata kunci 'Else' akan dieksekusi. Jika kedua kondisi tidak benar, kode di bawah kata kunci 'Else' akan dieksekusi.
Tambahkan kode berikut ke btnOR_Click
Private Sub btnOR_Click() If (1 = 1) Or (5 = 0) Then MsgBox "OR evaluated to TRUE", vbOKOnly, "OR operator" Else MsgBox "OR evaluated to FALSE", vbOKOnly, "OR operator" End If End Sub
VBA Jika ATAU Operator
- “Jika (1 = 1) Atau (5 = 0) Maka” Pernyataan if menggunakan operator logika OR untuk menggabungkan dua kondisi (1 = 1) dan (5 = 0). Jika salah satu kondisi bernilai true, kode di atas kata kunci Else akan dieksekusi. Jika kedua kondisi bernilai false, kode di bawah kata kunci Else akan dieksekusi.
Tambahkan kode berikut ke btnNOT_Click
Private Sub btnNOT_Click() If Not (0 = 0) Then MsgBox "NOT evaluated to TRUE", vbOKOnly, "NOT operator" Else MsgBox "NOT evaluated to FALSE", vbOKOnly, "NOT operator" End If End Sub
VBA Jika TIDAK Operator
- “Jika Tidak (0 = 0) Maka” Fungsi VBA If Not menggunakan operator logika NOT untuk meniadakan hasil kondisi pernyataan if. Jika kondisinya benar, kode di bawah kata kunci 'Else' akan dieksekusi. Jika kondisinya benar, kode di atas kata kunci Else akan dieksekusi.
Unduh Excel yang berisi kode di atas