Logico VBA Operatori: AND, OR, NOT, SE NON in Excel VBA
Excel VBA logico OperaTors
Supponiamo che tu voglia elaborare un ordine cliente. Per questo, devi prima verificare se il prodotto ordinato esiste o meno. In tal caso, vuoi anche verificare se la quantitร disponibile รจ sufficiente. Gli operatori logici tornano utili in questi casi. Gli operatori logici vengono utilizzati per valutare piรน di una condizione.
I principali operatori logici VBA di Excel AND, OR, NOT sono elencati nella tabella seguente:
| S / N | Operator | Descrizione | Esempio | Uscita |
|---|---|---|---|---|
| 1 | and | AND: viene utilizzato per combinare piรน di una condizione. Se tutte le condizioni sono vere, AND restituisce vero. Se una qualsiasi delle condizioni รจ falsa, AND restituisce falso | Se vero = vero E falso = vero ALLORA | falso |
| 2 | OR | OR: viene utilizzato per combinare piรน di una condizione. Se una qualsiasi delle condizioni risulta vera, OR restituisce vero. Se sono tutti falsi, OR restituisce falso | Se vero = vero O vero = falso ALLORA | vero |
| 3 | NON | NOT: funziona come una funzione inversa. Se la condizione รจ vera, restituisce falso, mentre se una condizione รจ falsa, restituisce vero. | Se NON (vero) Allora | falso |
Logico VBA OperaEsempio di fonte Code
Per ragioni di semplicitร , confronteremo i numeri codificati.
Aggiungi pulsanti ActiveX al foglio dall'opzione "Inserisci".
Imposta le proprietร come mostrato nell'immagine qui sotto

Nella tabella seguente sono riportate le proprietร che รจ necessario modificare e i valori che รจ necessario aggiornare.
| S / N | Controllate | Proprietร | Valore |
|---|---|---|---|
| 1 | PulsanteComando1 | Nome | btnAND |
| Didascalia | and Operator (0 = 0) | ||
| 2 | PulsanteComando2 | Nome | btnOR |
| Didascalia | OR Operator (1 = 1) Oppure (5 = 0) | ||
| 3 | PulsanteComando3 | Nome | btnNOT |
| Didascalia | NON Operao Non (0 = ) |
Aggiungere il seguente codice a 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 Se AND Operator
- โSe (1 = 1) E (0 = 0) Alloraโ l'istruzione if utilizza l'operatore logico AND per combinare due condizioni (1 = 1) e (0 = 0). Se entrambe le condizioni sono vere, viene eseguito il codice sopra la parola chiave "Else". Se entrambe le condizioni non sono vere, viene eseguito il codice sotto la parola chiave "Else".
Aggiungere il seguente codice a 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 Se OR Operator
- โSe (1 = 1) Oppure (5 = 0) Alloraโ l'istruzione if utilizza l'operatore logico OR per combinare due condizioni (1 = 1) e (5 = 0). Se una qualsiasi delle condizioni รจ vera, viene eseguito il codice sopra la parola chiave Else. Se entrambe le condizioni sono false, viene eseguito il codice sotto la parola chiave Else.
Aggiungere il seguente codice a 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 In caso contrario Operator
- โSe no (0 = 0) alloraโ la funzione VBA If Not utilizza l'operatore logico NOT per negare il risultato della condizione dell'istruzione if. Se le condizioni sono vere, viene eseguito il codice sotto la parola chiave "Else". Se la condizione รจ vera, viene eseguito il codice sopra la parola chiave Else.
