Logico VBA Operatori: AND, OR, NOT, SE NON in Excel VBA

Logico VBA Operatori: E, O, NON

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

Logico VBA OperaTors
Logico VBA OperaTors

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.

Scarica Excel contenente il codice sopra

Riassumi questo post con: