VBA Logis Operator: DAN, ATAU, TIDAK, JIKA TIDAK di Excel VBA

VBA Logis Operators: DAN, ATAU, TIDAK

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

VBA Logis Operatorso
VBA Logis Operatorso

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