Logički operater I | Logički operater Ili | Logički operater Ne
Tri najčešće korištena logički operatori u Excel VBA su: I, Ili i Ne. Kao i uvijek, poslužit ćemo se jednostavnim primjerima kako bismo stvari učinili jasnijima.
Logički operater And
Postavite naredbeni gumb na radni list i dodajte sljedeće retke koda:
Zatamni rezultat 1 kao cijeli broj, rezultat 2 kao cijeli broj, rezultat kao niz
score1 = Raspon ("A1"). Vrijednost
score2 = Raspon ("B1"). Vrijednost
Ako je rezultat1> = 60 I rezultat2> 1 Tada
rezultat = "proći"
Drugo
rezultat = "neuspjeh"
Završi ako
Raspon ("C1"). Vrijednost = rezultat
Objašnjenje: ako je rezultat 1 veći ili jednak 60, a rezultat 2 veći od 1, Excel VBA vraća prolaz, u suprotnom Excel VBA vraća neuspješno.
Rezultat kada pritisnete naredbeni gumb na listu:
Zaključak: Excel VBA vraća neuspješno jer rezultat 2 nije veći od 1.
Logički operater Or
Postavite naredbeni gumb na radni list i dodajte sljedeće retke koda:
Zatamni rezultat 1 kao cijeli broj, rezultat 2 kao cijeli broj, rezultat kao niz
score1 = Raspon ("A1"). Vrijednost
score2 = Raspon ("B1"). Vrijednost
Ako je rezultat1> = 60 Ili rezultat2> 1 Tada
rezultat = "proći"
Drugo
rezultat = "neuspjeh"
Završi ako
Raspon ("C1"). Vrijednost = rezultat
Objašnjenje: ako je rezultat 1 veći ili jednak 60 ili je rezultat 2 veći od 1, Excel VBA vraća prolaz, u suprotnom Excel VBA vraća neuspješno.
Rezultat kada pritisnete naredbeni gumb na listu:
Zaključak: Excel VBA vraća prolaz jer je rezultat 1 veći ili jednak 60.
Logički operater Ne
Postavite naredbeni gumb na radni list i dodajte sljedeće retke koda:
Zatamni rezultat 1 kao cijeli broj, rezultat 2 kao cijeli broj, rezultat kao niz
score1 = Raspon ("A1"). Vrijednost
score2 = Raspon ("B1"). Vrijednost
Ako je rezultat1> = 60 I nije rezultat2 = 1 Tada
rezultat = "proći"
Drugo
rezultat = "neuspjeh"
Završi ako
Raspon ("C1"). Vrijednost = rezultat
Objašnjenje: ako je rezultat 1 veći ili jednak 60, a rezultat 2 nije jednak 1, Excel VBA vraća prolaz, u suprotnom Excel VBA vraća neuspješno.
Rezultat kada pritisnete naredbeni gumb na listu:
Zaključak: Excel VBA vraća neuspješno jer je rezultat 2 jednak 1.