VBA logikai operátorok: ÉS, VAGY, NEM
Excel VBA logikai operátorok
Tegyük fel, hogy feldolgozni szeretné az ügyfél megrendelését. Ehhez először ellenőrizni szeretné, hogy létezik-e a megrendelt termék. Ha mégis, akkor azt is ellenőrizni szeretné, hogy a kéznél lévő mennyiség elegendő-e. A logikai operátorok jól jönnek ilyen esetekben. A logikai operátorokat egynél több feltétel értékelésére használják.
A fő Excel VBA logikai operátorok ÉS, VAGY NEM, szerepelnek az alábbi táblázatban:
S / N | Operátor | Leírás | Példa | Kimenet |
1 | ÉS | ÉS: Ez több feltétel kombinálására szolgál. Ha minden feltétel igaz, az AND igaznak értékeli. Ha bármelyik feltétel hamis, az AND hamisnak értékeli | Ha igaz = igaz ÉS hamis = igaz AKKOR | hamis |
2 | VAGY | VAGY: Ez egynél több feltétel kombinálására szolgál. Ha bármelyik feltétel igaznak bizonyul, akkor az OR igazat ad vissza. Ha mindegyikük hamis, az OR hamis értéket ad vissza | Ha igaz = igaz VAGY igaz = hamis AKKOR | igaz |
3 | NEM | NEM: Ez úgy működik, mint egy inverz függvény. Ha a feltétel igaz, akkor hamis értéket ad vissza, ha pedig hamis, akkor igaz értéket ad vissza. | Ha NEM (igaz) Akkor | hamis |
VBA logikai operátorok példa forráskódra
Az egyszerűség kedvéért összehasonlítani fogjuk a keményen kódolt számokat.
Adja hozzá az ActiveX gombokat a laphoz a "Beszúrás" menüből.
Állítsa be a tulajdonságokat az alábbi képen látható módon
Az alábbi táblázat bemutatja azokat a tulajdonságokat, amelyeket meg kell változtatnia, és azokat az értékeket, amelyeket frissítenie kell.
S / N | Ellenőrzés | Ingatlan | Érték |
1 | CommandButton1 | Név | btnAND |
Felirat | ÉS Operátor (0 = 0) | ||
2 | CommandButton2 | Név | btnOR |
Felirat | VAGY Üzemeltető (1 = 1) Vagy (5 = 0) | ||
3 | CommandButton3 | Név | btnNEM |
Felirat | NOT Operator Not (0 =) |
Adja hozzá a következő kódot a btnAND_Click fájlhoz
Private Sub btnAND_Click()If (1 = 1) And (0 = 0) ThenMsgBox "AND evaluated to TRUE", vbOKOnly, "AND operator"ElseMsgBox "AND evaluated to FALSE", vbOKOnly, "AND operator"End IfEnd Sub
VBA If ÉS üzemeltető
- "If (1 = 1) És (0 = 0) Akkor" az if utasítás az AND logikai operátort használja két feltétel (1 = 1) és (0 = 0) kombinálásához. Ha mindkét feltétel teljesül, akkor az 'Egyéb' kulcsszó fölötti kód kerül végrehajtásra. Ha mindkét feltétel nem teljes, akkor az 'Egyéb' kulcsszó alatti kód kerül végrehajtásra.
Adja hozzá a következő kódot a btnOR_Click fájlhoz
Private Sub btnOR_Click()If (1 = 1) Or (5 = 0) ThenMsgBox "OR evaluated to TRUE", vbOKOnly, "OR operator"ElseMsgBox "OR evaluated to FALSE", vbOKOnly, "OR operator"End IfEnd Sub
VBA Ha VAGY üzemeltető
- "If (1 = 1) Vagy (5 = 0) Akkor" az if utasítás az OR logikai operátort használja két feltétel (1 = 1) és (5 = 0) kombinálásához. Ha bármelyik feltétel teljesül, akkor az Else kulcsszó fölött lévő kód kerül végrehajtásra. Ha mindkét feltétel hamis, akkor az Else kulcsszó alatti kód kerül végrehajtásra.
Adja hozzá a következő kódot a btnNOT_Click fájlhoz
Private Sub btnNOT_Click()If Not (0 = 0) ThenMsgBox "NOT evaluated to TRUE", vbOKOnly, "NOT operator"ElseMsgBox "NOT evaluated to FALSE", vbOKOnly, "NOT operator"End IfEnd Sub
VBA Ha NEM Operátor
- "Ha nem (0 = 0), akkor" a VBA Ha nem függvény a NOT logikai operátort használja az if utasítás feltételének elutasításához. Ha a feltételek teljesülnek, az 'Egyéb' kulcsszó alatti kód végrehajtásra kerül. Ha a feltétel igaz, akkor az Else kulcsszó feletti kód kerül végrehajtásra.
Töltse le a fenti kódot tartalmazó Excel programot