Operator logic și | Operator logic Sau | Operator logic Nu
Cele trei cele mai utilizate operatori logici în Excel VBA sunt: Și, Sau și Nu. Ca întotdeauna, vom folosi exemple ușoare pentru a clarifica lucrurile.
Operator logic Și
Plasați un buton de comandă pe foaia de lucru și adăugați următoarele linii de cod:
Dim scor1 Ca Integer, score2 As Integer, rezultă Ca Șir
scor1 = Interval ("A1"). Valoare
scor2 = Interval ("B1"). Valoare
Dacă scor1> = 60 Și scor2> 1 Apoi
result = "trece"
Altfel
result = "esueaza"
End If
Interval ("C1"). Valoare = rezultat
Explicație: dacă scorul1 este mai mare sau egal cu 60 și scorul2 este mai mare decât 1, Excel VBA returnează trecere, altfel Excel VBA returnează eșuează.
Rezultatul când faceți clic pe butonul de comandă de pe foaie:
Concluzie: returnările Excel VBA nu reușesc, deoarece scorul2 nu este mai mare de 1.
Operator logic Or
Plasați un buton de comandă pe foaia de lucru și adăugați următoarele linii de cod:
Dim scor1 Ca Integer, score2 As Integer, rezultă Ca Șir
scor1 = Interval ("A1"). Valoare
scor2 = Interval ("B1"). Valoare
Dacă scor1> = 60 Sau scor2> 1 Atunci
result = "trece"
Altfel
result = "esueaza"
End If
Interval ("C1"). Valoare = rezultat
Explicație: dacă scorul 1 este mai mare sau egal cu 60 sau scorul 2 este mai mare decât 1, Excel VBA returnează trecere, altfel Excel VBA returnează eșuează.
Rezultatul când faceți clic pe butonul de comandă de pe foaie:
Concluzie: Excel VBA returnează aprobarea, deoarece scorul 1 este mai mare sau egal cu 60.
Operator logic Nu
Plasați un buton de comandă pe foaia de lucru și adăugați următoarele linii de cod:
Dim scor1 Ca Integer, score2 As Integer, rezultă Ca Șir
scor1 = Interval ("A1"). Valoare
scor2 = Interval ("B1"). Valoare
Dacă scor1> = 60 Și Not scor2 = 1 Atunci
result = "trece"
Altfel
result = "esueaza"
End If
Interval ("C1"). Valoare = rezultat
Explicație: dacă scorul 1 este mai mare sau egal cu 60 și scorul 2 nu este egal cu 1, Excel VBA returnează trecere, altfel Excel VBA returnează eșuează.
Rezultatul când faceți clic pe butonul de comandă de pe foaie:
Concluzie: returnările Excel VBA nu reușesc, deoarece scorul2 este egal cu 1.
