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

VBA logiskt Operators: OCH, ELLER, INTE

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.

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

S / N	Operator	Description	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 sant = sant OCH falskt = sant 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 sant = sant ELLER sant = falskt 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 (sant) då	falsk

VBA logiskt Operators Exempel källkod

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

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 (0 = 0)
2	Kommandoknapp2	Namn	btnOR
		Bildtext	OR Operator (1 = 1) Eller (5 = 0)
3	Kommandoknapp3	Namn	btn INTE
		Bildtext	INTE Operator inte (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

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'.

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) och (5 = 0). Om något av villkoren är sant exekveras koden ovanför nyckelordet Else. Om båda villkoren är falska exekveras koden under nyckelordet Else.

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 If Not-funktionen använder den logiska NOT-operatorn för att negera resultatet av if-satsvillkoret. Om villkoren är sanna exekveras koden under nyckelordet "Else". Om villkoret är sant exekveras koden ovanför nyckelordet Else.

Ladda ner Excel som innehåller ovanstående kod

Du kanske gillar: