VBA Mantıksal Operators: VE, VEYA, DEĞİL, Excel VBA'da DEĞİLSE

VBA Mantıksal Operators: VE, VEYA, DEĞİL

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

VBA Mantıksal Operaları
VBA Mantıksal Operaları

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