Hvordan Telle rader i et Excel-regneark ved hjelp av VBA-makroer

Når du arbeider med Excel-data, kan du trenger å vite hvor mange rader som blir brukt i et regneark. Det finnes en rekke måter å beregne eller telle antall rader som brukes i et regneark, og bruker Excel VBA er bare ett av dem. Programmere en VBA-makro ikke bare gjør det mulig å telle antall datarader i et regneark, men lar deg bruke funksjonen gjentatte ganger med Excel-arbeidsbøker.

Bruksanvisning

Programmering av Macro

1 Åpne Excel-regneark og åpne VBA editor ved å trykke "Alt + F11."

2 Start en ny VBA-prosjekt filen ved å høyreklikke arbeidsboken på høyre menyen og velge "Ny" alternativet.

3 Start det nye funksjonen ved å skrive "Sub CountRows ()." Dette informerer VBA kompilator som det er en ny subrutine i prosjektfilen. Hvis du foretrekker å gi subrutinen et annet navn, bare endre "CountRows" til hva du vil den skal si, men det må ha åpen og lukket parentes bak det, som i "Dittnavn ()".

4 Lag en variabel ved å inkludere "Dim Tell som Long" i neste linje.

5 Skriv inn følgende kode:

Count = 0
Gjøre

Count = Count + 1
ActiveCell.Offset(1, 0).Select

Loop Inntil IsEmpty (ActiveCell.Offset (0, 1))

Dette forteller kompilatoren programmet først tømme ut greven variable, deretter begynne å bevege seg gjennom regnearket. Den legger den ene til den totale telle, deretter beveger seg ned til den neste celle, så lenge den neste cellen er tom. Når den når en tom celle, vil det slutte å kjøre.

6 Ta opp en meldingsboks ved å legge til en ny linje med "MsgBox Count" i den. Dette vil vise en pop-up boks med det totale antallet rader i det. For å gjøre meldingsboksen virke litt mer nyttig, kan du legge til litt mer tekst til den. Endre linjen til å lyde som følger:

MsgBox "Det er« Greven »rader"

Du kan endre teksten mellom anførselstegn for å måte hva du ønsker den skal være.

7 Til slutt, type "End Sub" i en ny linje for å lukke funksjonen ut.

Kjøre Macro

8 Gå tilbake til Excel-regneark, og lagre det.

9 Marker den første cellen i kolonnen med flest data. Dette vil være en kolonne som ikke har noen tomme celler mellom toppen og bunnen.

10 Åpne "Verktøy" -menyen og velg "makroer" for å få opp dialogboksen makroer med alle makroer programmert inn i regnearket.

11 Velg makro § 1, "CountRows" eller hva navnet du gav den. Klikk på "Run." Når fullført, vil Macro dukker opp med meldingsboksen rapport over antall rader du har fylt.

Hint

• Det kan være raskere og enklere, hvis alt du trenger er et tall, for å telle radene ved hjelp av en formel. I en tom celle, type "= ANTALL (A: A, IF (A & gt; 0,1,0))", hvor A er kolonnen som du teller.
• Den ovennevnte metoden fungerer bare for en serie av rader med data. VBA skriptet vil avslutte på første tomme raden - selv om andre rader med data følge.