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

Forfatter: Joan Hall
Opprettelsesdato: 26 Januar 2021
Oppdater Dato: 20 Kan 2024
Anonim
Excel VBA - Rows & Columns Count
Video: Excel VBA - Rows & Columns Count

Innhold

Noen ganger må vi vite antall rader som brukes i et Excel-regneark, slik at vi kan opprette en formel eller til og med en VBA-makro. Heldigvis er det noen ganske enkle måter å gjøre dette på, og Excel VBA er bare en av dem.Den enkleste måten å finne ut denne informasjonen er å gå til bunnen av regnearket ditt og se på tallet til høyre for det siste datapunktet. Men med VBA er denne beregningen ekstremt enkel.


retninger

Med VBA er det ekstremt enkelt å beregne antall rader i et Excel-regneark (BananaStock / BananaStock / Getty Images)

    Planlegger makroen

  1. Åpne Excel-regnearket og VBA-editoren ved å trykke "Alt + F11".

  2. Start en ny VBA-prosjektfil ved å høyreklikke på arbeidsboken din, vises i menyen til høyre, og velg "Ny".

  3. Start den nye funksjonen ved å skrive "Sub CountRows ()". Dette forteller VBA-kompilatoren at det er en ny underrutine for prosjektfilen. Hvis du foretrekker å gi nytt navn til subrutinen, endrer du teksten "CountRows" til ønsket navn, som må følges av parentesene som vises ovenfor, for eksempel "YourName ()".

  4. Opprett en variabel, inkludert teksten "Dim Count as Long" på neste linje.


  5. Skriv inn følgende kode:

    Count = 0 Count = Count + 1 ActiveCell.Offset (1, 0) .Velg Loop Until IsEmpty (ActiveCell.Offset (0, 1))

    Dette informerer kompilatorprogrammet om at det er nødvendig å analysere Count-variabelen og deretter telle rader i hele regnearket. Koden legger til en variabel i Total Count, og flyttes deretter til neste celle så lenge den er tom. Når den når en tom celle, stopper kjøringen.

  6. Aktiver en tekstboks ved å legge til en ny linje med teksten "MsgBox Count". Dette vil vise en popup-boks som forteller deg totalt antall rader. For å gjøre boksen litt mer nyttig, kan du skrive inn ytterligere tekst. Endre navn på linje til:

    MsgBox "Det er" [telle nummer] "linjer"

    Du kan endre teksten i anførselstegn som ønsket.

  7. Til slutt skriver du "End Sub" i en ny linje for å avslutte subrutin-funksjonen.


    Kjører makroen

  1. Gå tilbake til Excel-regnearket og lagre det.

  2. Fremhev den første kolonncellen som inneholder det største antallet data. Denne kolonnen skal ikke inneholde tomme celler fra toppen til bunnen.

  3. Åpne menyen "Verktøy" og velg "Makroer" for å vise en dialogboks som inneholder alle makroene som er programmert for regnearket.

  4. Velg makroen opprettet i Seksjon 1, med navnet "CountRows" eller et annet navn du ga det, og klikk "Kjør". Når det er ferdig, vil makroen vise en popup-tekstboks som forteller deg antall fylte rader

tips

  • Hvis du bare trenger å få et tall, er et enklere og enklere alternativ å telle rader ved hjelp av en formel. I en tom celle, skriv "= COUNT (A: A, IF (A> 0,1,0))", hvor A er kolonnen hvis antall rader blir talt.