VBA loģiskie operatori: UN, VAI, NAV
Excel VBA loģiskie operatori
Pieņemsim, ka vēlaties apstrādāt klienta pasūtījumu. Lai to izdarītu, vispirms vēlaties pārbaudīt, vai pasūtītais produkts pastāv. Ja tā notiek, jūs arī vēlaties pārbaudīt, vai pietiek ar rokas daudzumu. Loģiskie operatori šādos gadījumos ir noderīgi. Loģiskie operatori tiek izmantoti, lai novērtētu vairākus nosacījumus.
Galvenie Excel VBA loģiskie operatori AND, OR, NOT ir norādīti zemāk esošajā tabulā:
S / N | Operators | Apraksts | Piemērs | Rezultāts |
1 | UN | UN: to izmanto, lai apvienotu vairākus nosacījumus. Ja visi nosacījumi ir patiesi, AND vērtē kā patiesu. Ja kāds no nosacījumiem ir nepatiess, AND vērtē kā nepatiesu | Ja patiess = patiess UN nepatiess = patiess TAD | nepatiesa |
2 | VAI | VAI: to izmanto, lai apvienotu vairākus nosacījumus. Ja kāds no nosacījumiem ir taisnība, OR atgriež patiesu. Ja visi no tiem ir nepatiesi, OR atgriež nepatiesu | Ja patiess = patiess VAI patiess = nepatiesa TAD | taisnība |
3 | NĒ | NĒ: Šis darbojas kā apgriezta funkcija. Ja nosacījums ir patiess, tas atgriež false, un, ja nosacījums ir false, tas atgriež true. | Ja NĒ (taisnība) Tad | nepatiesa |
VBA loģisko operatoru avota koda piemērs
Vienkāršības labad mēs salīdzināsim stingri kodētus skaitļus.
Pievienojiet ActiveX pogas lapai no opcijas "Ievietot".
Iestatiet īpašības, kā parādīts zemāk esošajā attēlā

Šajā tabulā parādīti rekvizīti, kas jums jāmaina, un vērtības, kas arī jāatjaunina.
S / N | Kontrole | Īpašums | Vērtība |
1 | CommandButton1 | Nosaukums | btnAND |
Paraksts | UN operators (0 = 0) | ||
2 | CommandButton2 | Nosaukums | btnOR |
Paraksts | VAI Operators (1 = 1) Vai (5 = 0) | ||
3 | Komandas poga3 | Nosaukums | btnNOT |
Paraksts | NAV operators (0 =) |
Pievienojiet šo kodu vietnei btnAND_Click
Private Sub btnAND_Click()If (1 = 1) And (0 = 0) ThenMsgBox "AND evaluated to TRUE", vbOKOnly, "AND operator"ElseMsgBox "AND evaluated to FALSE", vbOKOnly, "AND operator"End IfEnd Sub
VBA Ja UN Operators
- "Ja (1 = 1) Un (0 = 0) Tad" if teikums izmanto loģisko operatoru AND, lai apvienotu divus nosacījumus (1 = 1) un (0 = 0). Ja abi nosacījumi ir patiesi, tiek izpildīts kods virs atslēgas vārda “cits”. Ja abi nosacījumi neatbilst patiesībai, tiek izpildīts kods zem atslēgas vārda “cits”.
Pievienojiet šo kodu vietnei btnOR_Click
Private Sub btnOR_Click()If (1 = 1) Or (5 = 0) ThenMsgBox "OR evaluated to TRUE", vbOKOnly, "OR operator"ElseMsgBox "OR evaluated to FALSE", vbOKOnly, "OR operator"End IfEnd Sub
VBA Ja VAI operators
- "Ja (1 = 1) Vai (5 = 0) Tad" if teikums izmanto loģisko operatoru OR, lai apvienotu divus nosacījumus (1 = 1) un (5 = 0). Ja kāds no nosacījumiem ir izpildīts, tiek izpildīts kods virs atslēgas vārda. Ja abi nosacījumi ir nepatiesi, tiek izpildīts kods zem cita atslēgvārda.
Pievienojiet šo kodu vietnei btnNOT_Click
Private Sub btnNOT_Click()If Not (0 = 0) ThenMsgBox "NOT evaluated to TRUE", vbOKOnly, "NOT operator"ElseMsgBox "NOT evaluated to FALSE", vbOKOnly, "NOT operator"End IfEnd Sub
VBA Ja NAV operators
- "Ja nav (0 = 0), tad" funkcija VBA Ja nav, loģisko operatoru NĒ izmanto, lai noraidītu nosacījuma if nosacījuma rezultātu. Ja nosacījumi ir patiesi, tiek izpildīts kods zem atslēgas vārda “cits”. Ja nosacījums ir patiess, tiek izpildīts kods virs atslēgas vārda.
Lejupielādējiet programmu Excel, kas satur iepriekš minēto kodu