VBA logisk Operators: OG, ELLER, IKKE, HVIS IKKE i Excel VBA

Af: Charlotte Møller Charlotte Møller
Hours Opdateret

VBA logisk Operators: OG, ELLER, IKKE

Excel VBA Logisk Operatorer

Lad os sige, at du vil behandle en kundeordre. For det skal du først tjekke om det bestilte produkt findes eller ej. Hvis det gør, vil du også gerne tjekke, om mængden på hånden er nok. Logiske operatører er nyttige i sådanne tilfælde. Logiske operatorer bruges til at evaluere mere end én betingelse.

De vigtigste logiske Excel VBA-operatorer OG, ELLER, IKKE er angivet i tabellen nedenfor:

S / N OperaTor Description Eksempel Produktion
1 AND OG: Dette bruges til at kombinere mere end én betingelse. Hvis alle betingelserne er sande, OG evalueres til sand. Hvis nogen af ​​betingelserne er falsk, AND evalueres til falsk Hvis sand = sand OG falsk = sand SÅ falsk
2 OR ELLER: Dette bruges til at kombinere mere end én betingelse. Hvis nogen af ​​betingelserne evalueres til sand, returnerer OR sand. Hvis alle er falske, returnerer OR falsk Hvis sand = sand ELLER sand = falsk SÅ sand
3 IKKE IKKE: Denne fungerer som en omvendt funktion. Hvis betingelsen er sand, returnerer den falsk, og hvis en betingelse er falsk, returnerer den sand. Hvis IKKE (sandt) så falsk

VBA logisk Operators Eksempel kildekode

For nemheds skyld sammenligner vi hårdt kodede tal.

Tilføj ActiveX-knapper til arket fra "Indsæt-indstilling".

Indstil egenskaberne som vist på billedet nedenfor

VBA logisk Operatorer
VBA logisk Operatorer

Følgende tabel viser de egenskaber, du skal ændre, og de værdier, du også skal opdatere.

S / N kontrol Ejendom Værdi
1 KommandoKnap1 Navn btnAND
Caption AND Operator (0 = 0)
2 KommandoKnap2 Navn btnOR
Caption OR Operator (1 = 1) Eller (5 = 0)
3 KommandoKnap3 Navn btn IKKE
Caption IKKE Operator ikke (0 = )

Tilføj følgende kode til 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 Hvis OG OperaTor

  • "Hvis (1 = 1) Og (0 = 0) Så" if-sætningen bruger den logiske AND-operator til at kombinere to betingelser (1 = 1) og (0 = 0). Hvis begge betingelser er sande, udføres koden over 'Else' nøgleordet. Hvis begge betingelser ikke er sande, udføres koden under 'Else' nøgleordet.

Tilføj følgende kode til 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

RELATEREDE ARTIKLER

VBA Hvis ELLER OperaTor

  • "Hvis (1 = 1) Eller (5 = 0) Så" if-sætningen bruger den logiske OR-operator til at kombinere to betingelser (1 = 1) og (5 = 0). Hvis nogen af ​​betingelserne er sande, udføres koden over Else nøgleordet. Hvis begge betingelser er falske, udføres koden under Else nøgleordet.

Tilføj følgende kode til 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 hvis IKKE OperaTor

  • "Hvis ikke (0 = 0) så" VBA If Not-funktionen bruger den logiske NOT-operator til at negere resultatet af if-sætningsbetingelsen. Hvis betingelserne er sande, udføres koden under 'Else' nøgleordet. Hvis betingelsen er sand, udføres koden over Else nøgleordet.

Download Excel, der indeholder ovenstående kode

Du kan lide: