VBA-telling - Tell numeriske verdier ved hjelp av Count-funksjonen i Excel VBA

Innholdsfortegnelse

Tellefunksjon i VBA Excel

I VBA Count-funksjonen brukes det til å telle at hvor mange antall celler som har verdier i seg, må vi huske at cellene som har tall eller tekst som er omsluttet i doble anførselstegn eller de cellene hvis verdier er skrevet direkte blir talt, disse cellene som har tilfeldige data som ikke kan oversettes med excel, telles ikke.

I VBA er COUNT en regnearkfunksjon som kan brukes gjennom funksjonsklassen for regneark. Det er ikke en innebygd funksjon. VBA COUNT-funksjonen kan telle alle de numeriske verdiene fra det medfølgende verdiområdet.

I denne artikkelen vil vi vise deg hvordan du bruker COUNT-funksjonen i VBA.

Eksempler på VBA Count-funksjon

La oss ta noen praktiske eksempler på VBA Count-funksjonen for å forstå hvordan den fungerer.

VBA Count Eksempel nr. 1

La oss skrive koden på egen hånd for å bruke denne COUNT-funksjonen i Excel VBA.

Trinn 1: Start makroen ved å starte underprosedyren.

Kode:

Sub Count_Example1 () End Sub

Trinn 2: Nå lagrer vi resultatet av COUNT-funksjonen i celle C2. Så koden vår skal være som "Range (" C2 "). Verdi =

Kode:

Sub Count_Example1 () Range ("C2"). Verdi = End Sub

Trinn 3: Siden det ikke er en innebygd VBA-funksjon, må vi søke gjennom arbeidsarkets funksjonsklasse. Så tilgang gjennom regnearkfunksjonsklasse.

Kode:

Sub Count_Example1 () Range ("C2"). Verdi = Worksheetfunction.Count (End Sub

Trinn 4: Gi nå området som A1 til A7.

Kode:

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

Ok, dette er tre enkle trinn for å komme til resultatet.

Kjør nå koden for å se resultatet i celle C2.

Som vanlig fikk vi resultatet som 3 som hvordan vi fikk da vi brukte VBA COUNT-funksjonen i et regneark.

Hvis vi observerer formellinjen, har vi ikke formelen. Snarere fikk vi nettopp resultatet av formelen. For å bruke formelen på cellen C2, må vi endre koden vår. Nedenfor er koden for å bruke formelen.

Kode:

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

Kjør denne VBA-koden ved å bruke F5-tasten eller manuelt. Deretter vil dette bruke formelen på cellen C2.

VBA Count Eksempel nr. 2

Se nå på et eksempel til med COUNT-funksjonen. For dette eksemplet, se på dataene nedenfor.

Vi har noen numeriske og ikke-numeriske verdier fra A1 til A11. Nå vil jeg bruke koden nedenfor for å telle de numeriske verdiene fra området A1 til A11.

Kode:

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

Når vi utfører ovennevnte kode manuelt eller bruker F5-tasten, fikk vi resultatet som 5.

Men når vi ser nærmere på dataene fra A1 til A11, har vi numeriske verdier i cellene A1, A2, A3, A4, A5, A7 og A11. Så totalt sett har vi numeriske verdier i 7 celler, men formelen har returnert resultatet som bare 5.

Årsaken til dette er når vi ser nøye på hver celle i celle A5 og A7, lagres verdiene som tekst, ikke som tall. Så COUNT-funksjonen har returnert resultatet som bare 5 fordi det behandler cellene som er formatert eller lagret som tekst som ikke-numeriske verdier og ignorerer fra det numeriske antallet.

På denne måten kan vi bruke COUNT-funksjonen i Excel som en del av både regneark og VBA-funksjoner for å telle de numeriske verdiene fra listen.

Interessante artikler...