VBA IsEmpty - Kako koristiti funkciju VBA IsEmpty? (Primjeri)

Sadržaj

VBA isprazna funkcija

IsEmpty je funkcija radnog lista koja se koristi da bi se utvrdilo jesu li zadane reference ćelije ili raspon ćelija prazne ili ne, budući da je funkcija radnog lista, pa se za upotrebu u VBA koristimo aplikacijom. Metoda radnog lista u VBA-u za upotrebu ove funkcije dolazi u logičke popise funkcija i vraća vrijednost true ako je referenca prazna.

VBA isprazna funkcija

VBA IsEmpty je logična funkcija koja ispituje je li odabrano prazno ili nije. Budući da je to logična funkcija, vratit će rezultate u logičkim vrijednostima, tj. TRUE ili FALSE.

Ako je odabrana ćelija prazna, vratit će TRUE ili će vratiti FALSE.

U ovom ćemo vam članku pokazati kako koristiti funkciju “ISEMPTY” u VBA za provjeru ćelija pomoću VBA kodova.

Što funkcija ISEMPTY radi u VBA?

Često nas prazne stanice frustriraju zbog učinkovitog rada na radnom listu. Pronaći prazne stanice nije najteže, ali ako ih prazne stanice skrivaju usred podataka, potrebno je naplatiti danak.

Da bismo pronašli prazne stanice u Excelu, imamo funkciju koja se naziva “ISBLANK” kao funkciju radnog lista, ali u VBA se zove “ISEMPTY”.

Ovo radi slično funkciji radnog lista "ISBLANK". Sada pogledajte donju formulu funkcije “ISEMPTY”.

Kao što vidimo na gornjoj slici, rezultat se vraća kao logička vrijednost, tj. TRUE ili FALSE.

Primjeri ISEMPTY funkcije u VBA

Slijede primjeri IsEmpty u VBA.

Primjer # 1

Sada ćemo vidjeti prvi praktični primjer "ISEMPTY". Za ovo pogledajte donju sliku radnog lista.

Sada ćemo primijeniti excel VBA ISEMPTY funkciju da testiramo sve ove.

Korak 1: Definirajte varijablu kao logičku .

Kodirati:

Sub IsEmpty_Example1 () Dim K Kao Boolean End Sub

Korak 2: Za ovu varijablu dodijelite vrijednost putem funkcije VBA ISEMPTY .

Kodirati:

Sub IsEmpty_Example1 () Dim K Kao Boolean K = IsEmpty (Kraj Sub

Korak 3: Izraz nije ništa drugo do ono što je stanica koju testiramo. Sada testiramo ćeliju A1 ćelija .

Kodirati:

Sub IsEmpty_Example1 () Dim K Kao Boolean K = IsEmpty (Raspon ("A1"). Vrijednost) Kraj Sub

Korak 4: Prikažite vrijednost ove varijable u VBA Msgboxu .

Kodirati:

Sub IsEmpty_Example1 () Dim K Kao Boolean K = IsEmpty (Raspon ("A1"). Vrijednost) MsgBox K End Sub

Pokrenite ovaj kod da biste provjerili rezultat.

Budući da postoji vrijednost u ćeliji A1, rezultat smo dobili FALSE.

Sada ću promijeniti referencu ćelije iz A1 u A5.

Kodirati:

Sub IsEmpty_Example1 () Dim K As Boolean K = IsEmpty (Raspon ("A5"). Vrijednost) MsgBox K End Sub

Pokrenite ovaj kod da biste vidjeli rezultat.

Rezultat smo dobili kao TRUE, a referencirana ćelija A5 zapravo je prazna ćelija, pa smo rezultat dobili kao „TRUE“.

Sad ću testirati ćeliju A8.

Kodirati:

Sub IsEmpty_Example1 () Dim K As Boolean K = IsEmpty (Raspon ("A8"). Vrijednost) MsgBox K End Sub

Pokrenite ovaj kod da biste vidjeli rezultat.

Oh!!! Drži se…

Rezultat smo dobili FALSE iako u ćeliji A8 nema vrijednosti.

Sad se postavlja pitanje je li to pogreška koja proizlazi iz formule “ISEMPTY” ?.

Ne … Apsolutno ne !!!

When I tried examining the cell A8 actually there is a space character inside the cell which is not easy to see with bare eyes.

So the conclusion is even Space is considered as a character in excel and VBA language.

Example #2 - Combination of VBA ISEMPTY with IF Condition

Actually, the real usage of the function “ISEMPTY” is admirable when we use it with other logical functions.

Especially when we use it with IF condition we can derive many useful results from it.

For this demonstration take a look at the below example.

In the Status column, if the “PF Status” column is empty, we need the value as “No Update,” and if there is any value, we need the values as “Collected Updates.”

Remember here we don’t need the default result of TRUE or FALSE. We need our own results here, to have our own results we need to use Excel VBA ISEMPTY with IF condition.

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

Imamo alternativu ISEMPTY funkciji, bez primjene excel VBA ISEMPTY funkcije zapravo možemo testirati ćeliju.

Za primjer pogledajte donji kod.

Kodirati:

Sub IsEmpty_Example3 () If Range ("B2"). Value = "" then Range ("C2"). Value = "No Update" Else Range ("C2"). Value = "Prikupljena ažuriranja" End If End Sub

Redak raspona koda ("B2 ″). Vrijednost =" " znači je li ćelija B2 ćelije jednaka praznoj ili nije.

Dvostruki navodnici ("") predstavljaju praznu ćeliju ili ne ako je prazan rezultat TRUE ili FALSE.