VBA IsEmpty - Kako uporabiti funkcijo VBA IsEmpty? (Primeri)

Kazalo

Funkcija VBA IsEmpty

IsEmpty je funkcija delovnega lista, ki se uporablja za ugotavljanje, ali je določena referenca celice ali obseg celic prazna ali ne, saj je funkcija delovnega lista, zato jo uporabljamo v programu VBA. Metoda delovnega lista v VBA za uporabo te funkcije spada v logični seznam funkcij in vrne true, če je sklic prazen.

Funkcija VBA IsEmpty

VBA IsEmpty je logična funkcija, ki preverja, ali je izbrano prazno ali ne. Ker gre za logično funkcijo, bo rezultate vrnil v logičnih vrednostih, tj. TRUE ali FALSE.

Če je izbrana celica prazna, bo vrnila TRUE ali pa vrnila FALSE.

V tem članku vam bomo pokazali, kako v VBA uporabite funkcijo “ISEMPTY” za preverjanje celic s kodami VBA.

Kaj naredi funkcija ISEMPTY v VBA?

Pogosto nam prazne celice onemogočajo učinkovito delo na delovnem listu. Iskanje praznih celic ni najtežje, če pa jih prazne celice skrivajo sredi podatkov, jih je treba najti.

Za iskanje praznih celic v Excelu imamo funkcijo »ISBLANK« kot funkcijo delovnega lista, v VBA pa »ISEMPTY«.

To deluje podobno kot funkcija delovnega lista »ISBLANK«. Zdaj pa si oglejte spodnjo formulo funkcije “ISEMPTY”.

Kot lahko vidimo na zgornji sliki, rezultat vrne kot logično vrednost, tj. TRUE ali FALSE.

Primeri funkcije ISEMPTY v VBA

Sledijo primeri IsEmpty v VBA.

Primer # 1

Zdaj bomo videli prvi praktični primer »ISEMPTY«. Za to si oglejte spodnjo sliko delovnega lista.

Zdaj bomo uporabili funkcijo excel VBA ISEMPTY za testiranje vseh teh.

1. korak: Spremenljivko definirajte kot logično .

Koda:

Sub IsEmpty_Example1 () Dim K Kot Boolean End Sub

2. korak: tej spremenljivki dodelite vrednost s funkcijo VBA ISEMPTY .

Koda:

Sub IsEmpty_Example1 () Dim K Kot logična K = IsEmpty (End Sub

3. korak: Izražanje ni nič drugega kot tisto celico, ki jo testiramo. Zdaj testiramo celico A1 celico .

Koda:

Sub IsEmpty_Example1 () Dim K Kot logična K = IsEmpty (obseg ("A1"). Vrednost) End Sub

4. korak: V spremenljivki VBA Msgbox prikažite vrednost te spremenljivke .

Koda:

Sub IsEmpty_Example1 () Dim K Kot logična K = IsEmpty (obseg ("A1"). Vrednost) MsgBox K End Sub

Zaženite to kodo, da preverite rezultat.

Ker v celici A1 obstaja vrednost, smo rezultat dobili FALSE.

Zdaj bom referenco celice spremenil iz A1 v A5.

Koda:

Sub IsEmpty_Example1 () Dim K Kot logična K = IsEmpty (obseg ("A5"). Vrednost) MsgBox K End Sub

Zaženite to kodo, da vidite rezultat.

Rezultat smo dobili kot TRUE referenčna celica A5 je dejansko prazna celica, zato smo dobili rezultat kot »TRUE«.

Zdaj bom preizkusil celico A8.

Koda:

Sub IsEmpty_Example1 () Dim K Kot logična K = IsEmpty (obseg ("A8"). Vrednost) MsgBox K End Sub

Zaženite to kodo, da vidite rezultat.

Joj !!! Počakaj…

Rezultat smo dobili FALSE, čeprav v celici A8 ni vrednosti.

Zdaj je vprašanje, ali gre za napako zaradi formule “ISEMPTY” ?.

Ne … Popolnoma 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 alternativo funkciji ISEMPTY, ne da bi uporabili funkcijo excel VBA ISEMPTY, lahko celico dejansko preizkusimo.

Za primer si oglejte spodnjo kodo.

Koda:

Sub IsEmpty_Example3 () Če obseg ("B2"). Value = "" Potem obseg ("C2"). Value = "Ni posodobitve" Drugi obseg ("C2"). Value = "Zbrane posodobitve" End If End Sub

Vrstica kode Obseg (“B2 ″). Vrednost =” ” pomeni, ali je celica B2 celica enaka prazni ali ne.

Dvojne narekovaje (“”) predstavljajo prazno celico ali ne, če je prazen rezultat TRUE ali sicer FALSE.