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

VBA logisk Operators: OG, ELLER, IKKE

Excel VBA Logisk Operatorer

La oss si at du vil behandle en kundebestilling. For det, vil du fรธrst sjekke om det bestilte produktet eksisterer eller ikke. Hvis den gjรธr det, vil du ogsรฅ sjekke om mengden pรฅ hรฅnden er nok. Logiske operatรธrer kommer godt med i slike tilfeller. Logiske operatorer brukes til รฅ evaluere mer enn รฉn tilstand.

De viktigste logiske Excel VBA-operatorene AND, OR, NOT er oppfรธrt i tabellen nedenfor:

S / N Operator Tekniske beskrivelser Eksempel Produksjon
1 OG OG: Dette brukes til รฅ kombinere mer enn รฉn betingelse. Hvis alle betingelsene er sanne, OG evalueres til sanne. Hvis noen av betingelsene er falske, OG evalueres til usann Hvis sant = sant OG usant = sant DA falsk
2 OR ELLER: Dette brukes til รฅ kombinere mer enn รฉn betingelse. Hvis noen av betingelsene evalueres til sann, returnerer OR sann. Hvis alle er falske, returnerer OR falsk Hvis sant = sant ELLER sant = usant Dร… sant
3 IKKE IKKE: Denne fungerer som en invers funksjon. Hvis betingelsen er sann, returnerer den usann, og hvis en betingelse er usann, returnerer den sann. Hvis IKKE (sant) sรฅ falsk

VBA logisk Operators Eksempelkilde Code

For enkelhets skyld vil vi sammenligne hardkodede tall.

Legg til ActiveX-knapper pรฅ arket fra "Sett inn-alternativet."

Angi egenskapene som vist pรฅ bildet nedenfor

VBA logisk Operatorer
VBA logisk Operatorer

Tabellen nedenfor viser egenskapene du mรฅ endre og verdiene du ogsรฅ mรฅ oppdatere.

S / N Kontroll: Eiendom Verdi
1 Kommandoknapp1 Navn btnAND
Bildetekst OG Operator (0 = 0)
2 Kommandoknapp2 Navn btnOR
Bildetekst OR Operator (1 = 1) Eller (5 = 0)
3 Kommandoknapp3 Navn btnIKKE
Bildetekst IKKE Operator Ikke (0 = )

Legg til fรธlgende kode 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 Hvis OG Operator

  • "Hvis (1 = 1) Og (0 = 0) Da" if-setningen bruker den logiske AND-operatoren for รฅ kombinere to betingelser (1 = 1) og (0 = 0). Hvis begge betingelsene er sanne, kjรธres koden over ยซElseยป-nรธkkelordet. Hvis begge betingelsene ikke er sanne, kjรธres koden under 'Else'-nรธkkelordet.

Legg til fรธlgende kode i 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 Hvis ELLER Operator

  • "Hvis (1 = 1) Eller (5 = 0) Da" if-setningen bruker den logiske operatoren OR for รฅ kombinere to betingelser (1 = 1) og (5 = 0). Hvis noen av betingelsene er sanne, kjรธres koden over Else-nรธkkelordet. Hvis begge betingelsene er usanne, kjรธres koden under Else-nรธkkelordet.

Legg til 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-funksjonen bruker den logiske NOT-operatoren for รฅ negere resultatet av if-setningsbetingelsen. Hvis betingelsene er sanne, kjรธres koden under 'Else'-nรธkkelordet. Hvis betingelsen er sann, kjรธres koden over Else-nรธkkelordet.

Last ned Excel som inneholder koden ovenfor

Oppsummer dette innlegget med: