VBA logiskt Operators: OCH, ELLER, INTE, OM INTE i Excel VBA

By: Charlotte Miller Charlotte Miller
Hours Uppdaterad

⚡ Smart sammanfattning

VBA logiskt Operatorer kombinerar flera villkor till ett enda Sant eller Falskt resultat. Den här sidan förklarar OCH, ELLER och INTE med exempel på körbara kommandoknappar, en fullständig sanningstabell och de mindre kända operatorerna XOR, Eqv och Imp.

  • 🔗 Syfte: Logiska operatorer utvärderar mer än ett villkor i en och samma If-sats.
  • ✅ AND Operator: Returnerar Sant endast när varje villkor den kopplar till är Sant.
  • ➕ OR Operator: Returnerar Sant när minst ett av villkoren är Sant.
  • 🔄 INTE Operator: Inverterar ett resultat och förvandlar Sant till Falskt och Falskt till Sant.
  • 📊 Sanningstabell: Ett enda referensrutnät visar resultatet av varje operator för varje inmatningskombination.
  • 🧮 extra Operators: Xor, Eqv och Imp hanterar exklusiva, ekvivalenta och implicita villkor.
  • ⚠️ Ingen kortslutning: VBA utvärderar varje del av ett villkor, så ett guard-test måste sitta i en kapslad If-funktion.
Läs mer

VBA logiskt Operatorer: OCH, ELLER, INTE i Excel VBA

Excel VBA Logisk Operatorer

Låt oss säga att du vill behandla en kundorder. För det vill du först kontrollera om den beställda produkten finns eller inte. Om den gör det vill du också kontrollera om mängden som finns till hands räcker. Logiska operatorer kommer väl till pass i sådana fall. Logiska operatorer används för att utvärdera mer än ett villkor.

Varje villkor i sig är uppbyggt av jämförelseoperatörer och returnerar Sant eller Falskt. En logisk operator kombinerar sedan dessa resultat till ett slutgiltigt svar.

De huvudsakliga logiska Excel VBA-operatorerna OCH, ELLER, NOT listas i tabellen nedan:

S / N Operator BESKRIVNING Exempelvis Produktion
1 AND OCH: Detta används för att kombinera mer än ett villkor. Om alla villkor är sanna, OCH utvärderas till sanna. Om något av villkoren är falskt, AND utvärderas till falskt Om (1 = 1) och (0 = 1) då falsk
2 OR ELLER: Detta används för att kombinera mer än ett villkor. Om något av villkoren utvärderas till sant, returnerar OR sant. Om alla är falska returnerar OR falskt Om (1 = 1) eller (5 = 0) då sann
3 INTE NOT: Den här fungerar som en omvänd funktion. Om villkoret är sant returnerar det falskt, och om ett villkor är falskt returnerar det sant. Om inte (0 = 0) då falsk

De tre beskrivningarna ovan är enklare att hålla i åtanke som ett enda rutnät av indata och resultat.

Sanningstabell för VBA Logical Operatorer

En sanningstabell listar alla kombinationer av indata och resultatet som varje operator returnerar. Att läsa den en gång eliminerar gissningsleken från alla villkor du senare skriver.

Villkor A Villkor B A och B A eller B Inte A
Sant Sant Sant Sant Falsk
Sant Falsk Falsk Sant Falsk
Falsk Sant Falsk Sant Sant
Falsk Falsk Falsk Falsk Sant

Två mönster är värda att memorera. AND producerar True på endast en rad av fyra, så det begränsar ett urval. OR producerar Falskt på endast en rad, så den breddar en. INTE tar ett enda villkor istället för två, vilket är anledningen till att den har en egen kolumn.

VBA logiskt Operators Exempelkälla Code

För enkelhetens skull kommer vi att jämföra hårdkodade nummer.

Lägg till ActiveX-knappar på arket från alternativet Infoga.

Ställ in egenskaperna som visas i bilden nedan

VBA logiskt Operatorer
VBA logiskt Operatorer

Följande tabell visar egenskaperna som du behöver ändra och de värden som du också behöver uppdatera.

S / N kontroll Fast egendom Värderar
1 Kommandoknapp1 Namn btnAND
Bildtext AND Operator (1 = 1) och (0 = 0)
2 Kommandoknapp2 Namn btnOR
Bildtext OR Operator (1 = 1) Eller (5 = 0)
3 Kommandoknapp3 Namn btn INTE
Bildtext INTE Operaeller Inte (0 = 0)

Lägg till följande kod i 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

RELATERADE ARTIKLAR

VBA Om OCH Operator

  • "Om (1 = 1) Och (0 = 0) Då" if-satsen använder den logiska operatorn AND för att kombinera två villkor (1 = 1) och (0 = 0). Om båda villkoren är sanna exekveras koden ovanför nyckelordet 'Else'. Om båda villkoren inte är sanna exekveras koden under nyckelordet 'Else'.

Båda villkoren är sanna här, så om du klickar på knappen visas "OCH utvärderat till SANT".

Lägg till följande kod till 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 Om ELLER Operator

  • "Om (1 = 1) Eller (5 = 0) Då" if-satsen använder den logiska operatorn OR för att kombinera två villkor (1 = 1) eller (5 = 0). Om något av villkoren är sant körs koden ovanför nyckelordet Else. Om båda villkoren är falska körs koden under nyckelordet Else.

Det första villkoret är sant och det andra är falskt, så ELLER returnerar fortfarande sant och meddelandet lyder "ELLER utvärderat till SANT".

Lägg till följande kod till 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 om INTE Operator

  • "Om inte (0 = 0) då" VBA-funktionen If Not använder den logiska operatorn NOT för att negera resultatet av if-satsens villkor. Det inre villkoret (0 = 0) är sant, så Not gör det till falskt och koden under nyckelordet 'Else' körs. Om det inre villkoret hade varit falskt skulle Not ha gjort det sant och koden ovanför 'Else' skulle ha körts istället.

Dessa tre knappar testar var och en ett fast värde. Verkliga förhållanden läses från kalkylbladet och blandar båda operatorfamiljerna.

Hur man kombinerar logik och jämförelse Operatorer

Ett produktionsmakro testar sällan ett fastlagt tal. Det läser ett värde, jämför det och sammanfogar flera av dessa jämförelser till ett enda beslut. Makrot nedan godkänner en order endast när produkten finns, kvantiteten är tillräcklig och kundkontot inte är spärrat.

Sub ApproveOrder()
    Dim QtyOnHand As Long
    Dim QtyOrdered As Long
    Dim OnHold As Boolean

    QtyOnHand = Sheet1.Range("B2").Value
    QtyOrdered = Sheet1.Range("B3").Value
    OnHold = Sheet1.Range("B4").Value

    ' All three parts must hold for the order to pass
    If (QtyOrdered > 0) And (QtyOnHand >= QtyOrdered) And Not OnHold Then
        Sheet1.Range("B5").Value = "Approved"
    Else
        Sheet1.Range("B5").Value = "On hold"
    End If
End Sub

Tre regler håller ett kombinerat villkor läsbart och korrekt.

  • Parentes varje jämförelse: VBA utvärderar jämförelseoperatorer före logiska, men parenteser bildar gruppenping uppenbara och förhindra ett misstag när tillståndet senare förvärras.
  • Tänk på att Och har företräde framför Eller: A eller B och C läses som A Eller (B Och C)Om du menade (A eller B) och C, parenteserna är obligatoriska.
  • Tillämpa Inte på ett booleskt tal, inte på ett tal: Inte i vänteläge läser naturligt. Undvik Inte 5, eftersom Not utför en bitvis operation på tal och returnerar -6 istället för False.

⚠️ Varning: VBA kortsluter inte. Om (ws är ingenting) eller (ws.Name = "Data") då, den andra delen körs fortfarande även när den första är sann, vilket orsakar körtidsfel 91. Dela upp sådana skydd i kapslade If-satser.

XOR, Eqv och Imp Operatorer i VBA

OCH, ELLER och INTE täcker nästan alla vardagliga villkor, men VBA tillhandahåller ytterligare tre logiska operatorer som ibland uttrycker en regel mycket tydligare än ett bo av If-satser.

Operator Returnerar Sant när Exempelvis Produktion
Xor Exakt ett av de två villkoren är sant, aldrig båda (1 = 1) X eller (5 = 0) Sant
ekv Båda villkoren har samma värde, båda sanna eller båda falska (1 = 1) Ekv. (2 = 2) Sant
Imp Det första villkoret antyder det andra; endast Sant Imp Falskt är falskt (1 = 1) Imp (5 = 0) Falsk

Xor är den mest praktiska av de tre. Den passar en regel som "en rabatt gäller en anställd eller en lojalitetsmedlem, men inte någon som är båda". Ekv. och Imp förekommer främst i äldre kod och i logikövningar, så det är viktigare att känna igen dem än att skriva dem.

Ladda ner Excel som innehåller ovanstående kod

Vanliga frågor

Det finns ingen praktisk gräns, men läsbarheten sjunker snabbt efter tre eller fyra. Flytta ett långt villkor till en boolesk variabel med ett beskrivande namn och testa sedan variabeln i If-satsen istället.

Tillämpat på ett tal utför Not en bitvis inversion snarare än en logisk. Tillämpar den endast på en jämförelse eller en boolesk variabel, till exempel Not (Qty > 0), så resultatet är Sant eller Falskt.

Logiken matchar, men syntaxen skiljer sig. En kalkylbladsformel anropar dem som funktioner, OCH(A1>0, B1>0). VBA placerar dem mellan villkoren istället, som i Om A1 > 0 Och B1 > 0 Då.

Ja. Klistra in villkoret och en AI-assistent skriver om det med tydligare parenteser eller delar upp det i namngivna booleska variabler. Verifiera omskrivningen mot en sanningstabell, eftersom en felaktig förenkling ändrar beteendet tyst.

Ja. Ange uttrycket så listar en AI-assistent varje inmatningskombination med dess resultat, vilket snabbt exponerar en gren som aldrig kan nås eller en hakparentes placerad på fel position.

Sammanfatta detta inlägg med: