VBA logisk Operators: OG, ELLER, IKKE, HVIS IKKE i Excel VBA
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 Eksempel kildekode
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
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