VBA-antal - Tæl numeriske værdier ved hjælp af Count-funktion i Excel VBA

Indholdsfortegnelse

Tæl funktion i VBA Excel

I VBA Count-funktionen bruges til at tælle, hvor mange celler der har værdier i det, skal vi huske, at de celler, der har tal eller tekst, der er lukket i dobbelt anførselstegn, eller de celler, hvis værdier er skrevet direkte, tælles, disse celler som har tilfældige data, som ikke kan oversættes med excel, tælles ikke med.

I VBA er COUNT en regnearksfunktion, der kan anvendes gennem regnearkfunktionsklassen. Det er ikke en indbygget funktion. VBA COUNT-funktionen kan tælle alle de numeriske værdier fra det medfølgende værdiområde.

I denne artikel viser vi dig, hvordan du bruger COUNT-funktionen i VBA.

Eksempler på VBA Count-funktion

Lad os tage nogle praktiske eksempler på VBA Count-funktion for at forstå dens funktion.

Eksempel på VBA-tælling nr. 1

Lad os skrive koden alene for at anvende denne COUNT-funktion i Excel VBA.

Trin 1: Start makroen ved at starte underproceduren.

Kode:

Sub Count_Example1 () Afslut Sub

Trin 2: Nu gemmer vi resultatet af COUNT-funktionen i celle C2. Så vores kode skal være som "Range (" C2 "). Værdi =

Kode:

Sub Count_Example1 () Range ("C2"). Værdi = End Sub

Trin 3: Da det ikke er en VBA-indbygget funktion, skal vi anvende gennem arbejdsarkets funktionsklasse. Så adgang gennem regnearkets funktionsklasse.

Kode:

Sub Count_Example1 () Range ("C2"). Værdi = Worksheetfunction.Count (End Sub

Trin 4: Giv nu området som A1 til A7.

Kode:

Sub Count_Example1 () Range ("C2"). Værdi = WorksheetFunction.Count (Range ("A1: A7")) End Sub

Ok, dette er tre enkle trin for at nå frem til resultatet.

Kør nu koden for at se resultatet i celle C2.

Som sædvanligt fik vi resultatet som 3, som vi fik, da vi anvendte VBA COUNT-funktionen i et regneark.

Hvis vi observerer formelbjælken, har vi ikke formlen. Snarere fik vi netop resultatet af formlen. For at anvende formlen på cellen C2 skal vi ændre vores kode. Nedenfor er koden til anvendelse af formlen.

Kode:

Sub Count_Example1 () Range ("C2"). Value = "= Count (A1: A7)" End Sub

Kør denne VBA-kode ved hjælp af F5-tasten eller manuelt. Derefter vil dette anvende formlen på cellen C2.

VBA Count Eksempel nr. 2

Se nu på endnu et eksempel med COUNT-funktionen. Se dette nedenstående data for dette eksempel.

Vi har et par numeriske og ikke-numeriske værdier fra A1 til A11. Nu vil jeg anvende nedenstående kode for at tælle de numeriske værdier fra området A1 til A11.

Kode:

Sub Count_Example2 () Range ("C2"). Value = "= Count (A1: A11)" End Sub

Når vi udfører ovenstående kode manuelt eller ved hjælp af F5-tasten, fik vi resultatet som 5.

Men når vi ser nærmere på dataene fra A1 til A11, har vi numeriske værdier i cellerne A1, A2, A3, A4, A5, A7 og A11. Så i alt har vi numeriske værdier i 7 celler, men formlen har kun returneret resultatet som 5.

Årsagen til dette er, når vi ser nøje på hver celle i celle A5 og A7, lagres værdierne som tekst, ikke som tal. Så COUNT-funktionen har returneret resultatet som kun 5, fordi det behandler de celler, der er formateret eller gemt som tekst, som ikke-numeriske værdier og ignorerer fra det numeriske antal.

På denne måde kan vi bruge COUNT-funktionen i excel som en del af både regneark og VBA-funktioner til at tælle de numeriske værdier fra listen.

Interessante artikler...