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 | E | 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 Operators Esempio di codice sorgente
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 | Controllo | Immobili | Valore |
---|---|---|---|
1 | PulsanteComando1 | Nome | btnAND |
Didascalia | E 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.
Scarica Excel contenente il codice sopra