VBA Mantıksal Operators: VE, VEYA, DEĞİL, Excel VBA'da DEĞİLSE
Excel VBA Mantıksal Operaları
Diyelim ki bir müşteri siparişini işleme koymak istiyorsunuz. Bunun için öncelikle sipariş ettiğiniz ürünün mevcut olup olmadığını kontrol etmelisiniz. Eğer öyleyse, elinizdeki miktarın yeterli olup olmadığını da kontrol etmek istersiniz. Mantıksal operatörler bu gibi durumlarda kullanışlıdır. Mantıksal operatörler birden fazla koşulu değerlendirmek için kullanılır.
Ana Excel VBA mantıksal operatörleri AND, OR, NOT aşağıdaki tabloda listelenmiştir:
S / N | Kullanım | Açıklama | Örnek E-posta | Çıktı |
---|---|---|---|---|
1 | VE | AND: Birden fazla koşulu birleştirmek için kullanılır. Tüm koşullar doğruysa AND, doğru olarak değerlendirilir. Koşullardan herhangi biri yanlışsa AND, yanlış olarak değerlendirilir | Eğer doğru = doğru VE yanlış = doğru ise SONRA | yanlış |
2 | OR | VEYA: Birden fazla koşulu birleştirmek için kullanılır. Koşullardan herhangi biri doğru olarak değerlendirilirse OR işlevi doğru değerini döndürür. Eğer hepsi yanlışsa VEYA yanlış değerini döndürür | Eğer doğru = doğru VEYA doğru = yanlış ise SONRA | gerçek |
3 | DEĞİL | NOT: Bu ters fonksiyon gibi çalışır. Koşul doğruysa false değerini, koşul yanlışsa true değerini döndürür. | DEĞİLSE (doğru) O zaman | yanlış |
VBA Mantıksal Operators Örnek Kaynak Kodu
Basitlik adına, sabit kodlanmış sayıları karşılaştıracağız.
“Ekle seçeneğinden” sayfaya ActiveX düğmeleri ekleyin.
Özellikleri aşağıdaki resimde gösterildiği gibi ayarlayın
Aşağıdaki tabloda değiştirmeniz gereken özellikler ve güncellemeniz gereken değerler gösterilmektedir.
S / N | Control | Varlığınızı | Özellik |
---|---|---|---|
1 | KomutDüğmesi1 | İsim | btnAND |
Başlık | VE Operator (0 = 0) | ||
2 | KomutDüğmesi2 | İsim | btnOR |
Başlık | OR Operator (1 = 1) Veya (5 = 0) | ||
3 | KomutDüğmesi3 | İsim | btnDEĞİL |
Başlık | DEĞİL OperaTor Değil (0 = ) |
Aşağıdaki kodu btnAND_Click'e ekleyin
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 Eğer VE Operator
- “Eğer (1 = 1) ve (0 = 0) ise O halde” if ifadesi iki koşulu (1 = 1) ve (0 = 0) birleştirmek için AND mantıksal operatörünü kullanır. Her iki koşul da doğruysa 'Else' anahtar sözcüğünün üzerindeki kod yürütülür. Her iki koşul da doğru değilse 'Else' anahtar sözcüğünün altındaki kod yürütülür.
Aşağıdaki kodu btnOR_Click'e ekleyin
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 VEYA ise Operator
- “Eğer (1 = 1) Veya (5 = 0) ise” if ifadesi, iki koşulu (1 = 1) ve (5 = 0) birleştirmek için OR mantıksal operatörünü kullanır. Koşullardan herhangi biri doğruysa Else anahtar sözcüğünün üzerindeki kod yürütülür. Her iki koşul da yanlışsa Else anahtar sözcüğünün altındaki kod yürütülür.
Aşağıdaki kodu btnNOT_Click'e ekleyin
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
DEĞİLSE VBA Operator
- “Değilse (0 = 0) O halde” VBA If Not işlevi, if ifadesi koşulunun sonucunu olumsuzlamak için NOT mantıksal operatörünü kullanır. Koşullar doğruysa 'Else' anahtar sözcüğünün altındaki kod yürütülür. Koşul doğruysa Else anahtar sözcüğünün üzerindeki kod yürütülür.
Yukarıdaki kodu içeren Excel'i indirin