VBA'da DEĞİLSE
Mantıksal işlevler, test etmek için birden çok koşul veya kriter gerektiren hesaplamalar için kullanışlıdır. Daha önceki makalelerimizde "VBA IF", "VBA OR" ve "VBA AND" koşullarını görmüştük. Bu yazıda, "VBA IF NOT" fonksiyonunu tartışacağız. VBA IF NOT işlevini tanıtmadan önce size önce VBA NOT işlevini göstermeme izin verin.
VBA'da DEĞİL işlevi nedir?
"DEĞİL", excel ve VBA ile sahip olduğumuz mantıksal işlevlerden biridir. Tüm mantıksal işlevler mantıksal testlerin yapılmasını gerektirir ve mantıksal test doğruysa DOĞRU verir, mantıksal test doğru değilse sonuç olarak YANLIŞ döndürür.
Ancak "VBA NOT" diğer mantıksal işlevin tamamen zıttıdır. Bunun mantıksal fonksiyonların ters fonksiyonu olduğunu söyleyebilirim.
Mantıksal test doğruysa "VBA DEĞİL" işlevi "YANLIŞ" döndürür ve mantıksal test doğru değilse "DOĞRU" döndürür. Şimdi, "VBA NOT" işlevinin sözdizimine bakın.
NOT (Mantıksal Test)Bu çok basit, mantıksal testi sağlamamız gerekiyor. NOT işlevi testi değerlendirir ve sonucu döndürür.
VBA'da NOT & IF Fonksiyonu örnekleri?
Aşağıda, Excel VBA'da IF ve NOT işlevini kullanma örnekleri verilmiştir.
Bu VBA IF DEĞİL Excel Şablonunu buradan indirebilirsiniz - Excel Şablonu DEĞİLSE VBA
Örnek 1
Örnek için aşağıdaki koda bir göz atın.
Kod:
Sub NOT_Example () Dim k As String k = Not (100 = 100) MsgBox k End Sub
Yukarıdaki kodda, değişkeni String olarak tanımladım.
Dim k As String
Daha sonra bu değişken için, NOT fonksiyonunu mantıksal test ile 100 = 100 olarak atadım.
k = Değil (100 = 100)
Sonra sonucu VBA mesaj kutusunda gösterecek kodu yazdım. MsgBox k
Şimdi kodu çalıştıracağım ve sonucu göreceğim.
Sonucu "YANLIŞ" olarak aldık.
Şimdi mantıksal teste geri dönün. Mantıksal testi 100 = 100 olarak sağladık ki bu genellikle DEĞİL fonksiyonunu verdiğimiz için sonucu YANLIŞ olarak aldık. Dediğim gibi başlangıçta diğer mantıksal fonksiyonlara göre ters sonuçlar veriyor. 100, 100'e eşit olduğundan, sonucu YANLIŞ olarak döndürmüştür.
Örnek 2
Şimdi, farklı sayılarla bir örneğe daha bakın.
Kod:
Sub NOT_Example () Dim k As String k = Not (85 = 148) MsgBox k End Sub
Kod burada değiştirdiğim tek şey aynı, mantıksal testi 100 = 100'den 85 = 148'e değiştirdim.
Şimdi kodu çalıştıracağım ve sonucun ne olduğunu göreceğim.
Bu sefer sonucu DOĞRU olarak aldık. Şimdi mantıksal testi inceleyin.
k = Değil (85 = 148)
85'in 148 sayısına eşit olmadığını hepimiz biliyoruz. NOT işlevi sonucu DOĞRU olarak döndürdü.
EĞER Koşullu DEĞİL:
Excel veya VBA'da, herhangi bir mantıksal koşul, kombinasyon IF koşulu olmadan tamamlanmaz. Excel koşulunda IF kullanarak, varsayılan DOĞRU veya YANLIŞ'ın ötesinde çok daha fazla şey yapabiliriz. Örneğin, yukarıdaki örneklerde varsayılan sonuçları YANLIŞ & DOĞRU aldık, bunun yerine sonucu kendi kelimelerimizle değiştirebiliriz.
Aşağıdaki koda bakın.
Kod:
Alt NOT_Örnek2 () Dim Number1 As String Dim Number2 As String Number1 = 100 Number2 = 100 Değilse (Number1 = Number2) O zaman MsgBox "Number 1, Number 2'ye eşit değildir" Else MsgBox "Number 1, Number 2'ye eşittir" End If Sub
İki değişken tanımladım.
Dize Olarak Dim Number1 ve Dize Olarak Dim Number2
For these two variables, I have assigned the numbers as 100 & 100 respectively.
Number1 = 100 & Number2 = 100
Then for NOT function, I have attached IF condition to alter the default TRUE or FALSE. If the result of the NOT function is TRUE then my result will be as follows.
MsgBox “Number 1 is not equal to Number 2”
If the NOT function result is FALSE then my result is as follows.
MsgBox “Number 1 is equal to Number 2”
Now I will run the code and see what happens.
We got the result as “Number 1 is equal to Number 2”, so NOT function has returned the FALSE result to IF condition so IF condition returned this result.
Like this, we can use IF condition to do the inverse test.