IsEmpty, belirli bir hücre referansının veya bir hücre aralığının boş olup olmadığını bulmak için kullanılan bir çalışma sayfası işlevidir, çünkü bir çalışma sayfası işlevi olduğundan, onu VBA'da kullanmak için Uygulamayı kullanırız. Bu işlevi kullanmak için VBA'daki çalışma sayfası yöntemi, bu işlev mantıksal işlev listelerinin altına gelir ve referans boşsa true döndürür.
VBA IsEmpty İşlevi
VBA IsEmpty, seçilenin boş olup olmadığını test eden mantıksal bir işlevdir. Mantıksal bir işlev olduğu için sonuçları Boole değerlerinde, yani DOĞRU veya YANLIŞ olarak döndürecektir.
Seçili hücre boşsa, DOĞRU ya da YANLIŞ döndürür.
Bu yazıda, VBA kodlarını kullanarak hücreleri kontrol etmek için VBA'da “ISEMPTY” işlevinin nasıl kullanılacağını göstereceğiz.
ISEMPTY İşlevi VBA'da Ne Yapar?
Genellikle boş hücreler, çalışma sayfasında verimli bir şekilde çalışmamız için bizi hayal kırıklığına uğratır. Boş hücreleri bulmak en zor şey değildir, ancak boş hücreler onları verilerin ortasında saklıyorsa, onları bulmak çok zor olur.
Excel'de boş hücreleri bulmak için çalışma sayfası işlevi olarak "ISBLANK" adlı işleve sahibiz, ancak VBA'da buna "ISEMPTY" denir.
Bu, "ISBLANK" çalışma sayfası işlevine benzer şekilde çalışır. Şimdi "ISEMPTY" fonksiyonunun aşağıdaki formülüne bir göz atın.
Yukarıdaki görüntüde görebileceğimiz gibi, sonucu Boole, yani DOĞRU veya YANLIŞ olarak döndürür.
VBA'da ISEMPTY İşlevi Örnekleri
Aşağıdakiler, VBA'da IsEmpty örnekleridir.
Örnek 1
Şimdi “ISEMPTY” nin ilk pratik örneğini göreceğiz. Bunun için çalışma sayfasının aşağıdaki resmine bakın.
Şimdi tüm bunları test etmek için excel VBA ISEMPTY işlevini uygulayacağız.
Adım 1: Değişkeni Boolean olarak tanımlayın .
Kod:
Sub IsEmpty_Example1 () Dim K As Boolean End Sub
Adım 2: Bu değişken için değeri VBA ISEMPTY işlevi aracılığıyla atayın .
Kod:
Sub IsEmpty_Example1 () Dim K As Boolean K = IsEmpty (End Sub
3. Adım: İfade, test ettiğimiz hücreden başka bir şey değildir. Şimdi A1 hücresini test ediyoruz .
Kod:
Alt IsEmpty_Example1 () Dim K As Boolean K = IsEmpty (Aralık ("A1"). Değer) End Sub
Adım 4: Bu değişkenin değerini VBA Msgbox'ta gösterin .
Kod:
Alt IsEmpty_Example1 () Dim K As Boolean K = IsEmpty (Aralık ("A1"). Değer) MsgBox K End Sub
Sonucu kontrol etmek için bu kodu çalıştırın.
A1 hücresinde bir değer olduğu için sonucu YANLIŞ olarak aldık.
Şimdi hücre referansını A1'den A5'e değiştireceğim.
Kod:
Alt IsEmpty_Example1 () Dim K As Boolean K = IsEmpty (Aralık ("A5"). Değer) MsgBox K End Sub
Sonucu görmek için bu kodu çalıştırın.
Sonucu DOĞRU olarak aldık, başvurulan A5 hücresi aslında boş bir hücre, dolayısıyla sonucu "DOĞRU" olarak aldık.
Şimdi A8 hücresini test edeceğim .
Kod:
Alt IsEmpty_Example1 () Dim K As Boolean K = IsEmpty (Aralık ("A8"). Değer) MsgBox K End Sub
Sonucu görmek için bu kodu çalıştırın.
Oh !!! Tut…
A8 hücresinde değer olmamasına rağmen sonucu YANLIŞ olarak aldık.
Şimdi soru, "ISEMPTY" formülünden bir hata sonucu mu ?.
Hayır… Kesinlikle Hayır !!!
A8 hücresini incelemeye çalıştığımda aslında hücrenin içinde çıplak gözle görülmesi kolay olmayan bir boşluk karakteri var.
Sonuç olarak, Space bile excel ve VBA dilinde bir karakter olarak kabul edilir.
Örnek 2 - VBA ISEMPTY ile IF Koşulunun Kombinasyonu
Aslında, "ISEMPTY" işlevinin gerçek kullanımı, onu diğer mantıksal işlevlerle birlikte kullandığımızda takdire şayan.
Özellikle IF koşulu ile kullandığımızda ondan birçok faydalı sonuç çıkarabiliriz.
Bu gösteri için aşağıdaki örneğe bir göz atın.
Durum sütununda "PF Durumu" sütunu boş ise "Güncelleme Yok" değerine, herhangi bir değer varsa "Toplanan Güncellemeler" olarak değerlere ihtiyacımız var.
Burada DOĞRU veya YANLIŞ varsayılan sonucuna ihtiyacımız olmadığını unutmayın. Burada kendi sonuçlarımıza ihtiyacımız var, kendi sonuçlarımıza sahip olmak için Excel VBA ISEMPTY'yi IF koşuluyla kullanmamız gerekiyor.
Step 1: Open IF condition.
Code:
Sub IsEmpty_Example2() If End Sub
Step 2: Inside the IF condition open ISEMPTY function.
Code:
Sub IsEmpty_Example2() If IsEmpty( End Sub
Step 3: The first logical test is cell B2 value is empty or not.
Code:
Sub IsEmpty_Example2() If IsEmpty(Range("B2").Value) Then End Sub
Step 4: If the logical test in excel vba is TRUE i.e., if the cell is empty, we need the result as “No Update” in cell C2.
Code:
Sub IsEmpty_Example2() If IsEmpty(Range("B2").Value) Then Range("C2").Value = "No Update" End Sub
Step 5: If the logical test is FALSE, we need the result in cell C2 as “Collected Updates.”
Code:
Sub IsEmpty_Example2() If IsEmpty(Range("B2").Value) Then Range("C2").Value = "No Update" Else Range("C2").Value = "Collects Updates" End If End Sub
Ok, we are done.
Run the code to get the result.
We got the result as “Collected Updates” because we have the non-empty cell in B2.
Now similarly apply the code for other cells to test.
Code:
Sub IsEmpty_Example2() If IsEmpty(Range("B2").Value) Then Range("C2").Value = "No Update" Else Range("C2").Value = "Collects Updates" End If If IsEmpty(Range("B3").Value) Then Range("C3").Value = "No Update" Else Range("C3").Value = "Collected Updates" End If If IsEmpty(Range("B4").Value) Then Range("C4").Value = "No Update" Else Range("C4").Value = "Collected Updates" End If End Sub
Run this code to have the results.
In cell C3 we got the result as “No Update” because there is no value in cell B3 i.e. Empty Cell. Since the logical formula returned TRUE we got the respective result.
Example #3 - Alternative to VBA ISEMPTY Function
ISEMPTY işlevine bir alternatifimiz var, excel VBA ISEMPTY işlevini uygulamadan hücreyi gerçekten test edebiliriz.
Bir örnek için aşağıdaki koda bakın.
Kod:
Alt IsEmpty_Example3 () Eğer Aralık ("B2"). Değer = "" Sonra Aralık ("C2"). Değer = "Güncelleme Yok" Başka Aralık ("C2"). Değer = "Toplanan Güncellemeler" End If End Sub
Kod aralığı satırı ("B2 ″). Değer =" , B2 hücresinin boşa eşit olup olmadığı anlamına gelir.
Çift Tırnaklar ("") boş bir hücreyi temsil eder veya boş sonuç DOĞRU veya YANLIŞ ise değil.
