Sådan tæller du rækkerne i et Excel-regneark ved hjælp af VBA-makroer

Forfatter: William Ramirez
Oprettelsesdato: 22 September 2021
Opdateringsdato: 1 Kan 2024
Anonim
Sådan tæller du rækkerne i et Excel-regneark ved hjælp af VBA-makroer - Artikler
Sådan tæller du rækkerne i et Excel-regneark ved hjælp af VBA-makroer - Artikler

Indhold

Nogle gange skal vi vide antallet af rækker, der bruges i et Excel-regneark, så vi kan oprette en formel eller endda en VBA-makro. Heldigvis er der nogle forholdsvis nemme måder at gøre dette på, og Excel VBA er blot en af ​​dem.Den nemmeste måde at finde ud af disse oplysninger er at gå til bunden af ​​dit regneark og se på nummeret til højre for det sidste datapunkt; Men med VBA er denne beregning ekstremt enkel.


retninger

Med VBA er det ekstremt nemt at beregne antallet af rækker i et Excel-regneark (BananaStock / BananaStock / Getty Images)

    Planlægning af makroen

  1. Åbn dit Excel-regneark og VBA-editoren ved at trykke på "Alt + F11".

  2. Start en ny VBA projektfil ved at højreklikke på din projektmappe, vises i menuen til højre og vælge "Ny".

  3. Start den nye funktion ved at skrive "Sub CountRows ()". Dette fortæller VBA-kompilatoren, at der er en ny underrutine til projektfilen. Hvis du foretrækker at omdøbe underrutinen, skal du ændre teksten "CountRows" til et hvilket som helst ønsket navn, som skal efterfølges af parenteserne vist ovenfor, for eksempel "YourName ()".

  4. Opret en variabel, herunder teksten "Dim Count as Long" på næste linje.


  5. Indtast følgende kode:

    Count = 0 Count = Count + 1 ActiveCell.Offset (1, 0) .Vælg lukning indtil IsEmpty (ActiveCell.Offset (0, 1))

    Dette informerer kompilatorprogrammet om, at det er nødvendigt at analysere graffevariablen og derefter tælle rækkerne i hele regnearket. Koden tilføjer en variabel til Total Count, og flyttes derefter til den næste celle, så længe den er tom. Når den når en tom celle, stopper udførelsen.

  6. Aktivér en tekstboks ved at tilføje en ny linje med teksten "MsgBox Count". Dette viser en pop op-boks, der fortæller dig det samlede antal rækker. For at gøre boksen lidt mere nyttig, kan du indtaste yderligere tekst. Omdøb linje til:

    MsgBox "Der er" [tæller nummer] "linjer"

    Du kan ændre teksten i anførselstegn som ønsket.

  7. Endelig skal du skrive "End Sub" i en ny linje for at afslutte subrutinfunktionen.


    Kører makroen

  1. Gå tilbage til dit Excel-regneark og gem det.

  2. Fremhæv den første kolonnecelle, der indeholder det største antal data. Denne kolonne må ikke indeholde tomme celler fra toppen til bunden.

  3. Åbn menuen "Værktøjer" og vælg "Makroer" for at vise en dialogboks, der indeholder alle de makroer, der er programmeret til regnearket.

  4. Vælg den makro, der er oprettet i afsnit 1, med navnet "CountRows" eller et andet navn, du gav det, og klik på "Kør". Når det er færdigt, viser makroen en pop op-tekstboks, der fortæller dig antallet af fyldte rækker

tips

  • Hvis du bare skal have et nummer, er et nemmere og enklere alternativ at tælle rækkerne ved hjælp af en formel. I en tom celle skal du skrive "= COUNT (A: A, IF (A> 0,1,0))", hvor A er kolonnen, hvis antal rækker tælles.