VBA logic Operators: ȘI, SAU, NU, DACĂ NU în Excel VBA
Excel VBA logic Operatori
Să presupunem că doriți să procesați o comandă de client. Pentru asta, doriți să verificați mai întâi dacă produsul comandat există sau nu. Dacă da, doriți să verificați și dacă cantitatea disponibilă este suficientă. Operatorii logici sunt folositori în astfel de cazuri. Operatorii logici sunt utilizați pentru a evalua mai mult de o condiție.
Principalii operatori logici Excel VBA ȘI, SAU, NU sunt enumerați în tabelul de mai jos:
S / N | OperaTdR | Descriere | Exemplu | producție |
---|---|---|---|---|
1 | AND | ȘI: Aceasta este folosită pentru a combina mai mult de o condiție. Dacă toate condițiile sunt adevărate, AND se evaluează la adevărat. Dacă oricare dintre condiții este falsă, AND se evaluează ca fals | Dacă adevărat = adevărat ȘI fals = adevărat, atunci | fals |
2 | OR | SAU: Aceasta este folosită pentru a combina mai mult de o condiție. Dacă oricare dintre condiții este evaluată la adevărat, SAU returnează adevărat. Dacă toate sunt false, SAU returnează false | Dacă adevărat = adevărat SAU adevărat = fals atunci | adevărat |
3 | NU | NU: Aceasta funcționează ca o funcție inversă. Dacă condiția este adevărată, returnează false, iar dacă o condiție este falsă, returnează adevărat. | Dacă NU (adevărat), atunci | fals |
VBA logic Operators Exemplu de cod sursă
De dragul simplității, vom compara numerele codificate greu.
Adăugați butoane ActiveX la foaie din „Opțiune de inserare”.
Setați proprietățile așa cum se arată în imaginea de mai jos
Următorul tabel arată proprietățile pe care trebuie să le modificați și valorile pe care trebuie să le actualizați.
S / N | Mod de control: | Proprietatea | Valoare |
---|---|---|---|
1 | Butonul Command1 | Nume | btnAND |
Legendă | AND Operator (0 = 0) | ||
2 | Butonul Command2 | Nume | btnOR |
Legendă | OR Operator (1 = 1) Sau (5 = 0) | ||
3 | Butonul Command3 | Nume | btnNU |
Legendă | NU Operator Not (0 = ) |
Adăugați următorul cod la 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 Dacă AND OperaTdR
- „Dacă (1 = 1) și (0 = 0) atunci” instrucțiunea if folosește operatorul logic AND pentru a combina două condiții (1 = 1) și (0 = 0). Dacă ambele condiții sunt adevărate, se execută codul de deasupra cuvântului cheie „Else”. Dacă ambele condiții nu sunt adevărate, se execută codul de sub cuvântul cheie „Else”.
Adăugați următorul cod la 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 Dacă SAU OperaTdR
- „Dacă (1 = 1) Sau (5 = 0) atunci” instrucțiunea if folosește operatorul logic SAU pentru a combina două condiții (1 = 1) și (5 = 0). Dacă oricare dintre condiții este adevărată, codul de mai sus este executat cuvântul cheie Else. Dacă ambele condiții sunt false, se execută codul de sub cuvântul cheie Else.
Adăugați următorul cod la 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 Dacă NU OperaTdR
- „Dacă nu (0 = 0) atunci” funcția VBA If Not folosește operatorul logic NOT pentru a anula rezultatul condiției instrucțiunii if. Dacă condițiile sunt adevărate, se execută codul de sub cuvântul cheie „Else”. Dacă condiția este adevărată, codul de mai sus se execută cuvântul cheie Else.
Descărcați Excel care conține codul de mai sus