Sådan Tæl rækker i et Excel-regneark ved hjælp af VBA makroer

April 6

Sådan Tæl rækker i et Excel-regneark ved hjælp af VBA makroer

Nogle gange er du nødt til at kende antallet af rækker, der anvendes i et Excel-regneark, enten for en formel eller nogle gange endda en VBA makro. Heldigvis er der et par enkle måder at opnå dette, og Excel VBA er blot en af ​​dem. Den enkleste måde at finde ud af disse oplysninger er at rulle til bunden af ​​dit regneark og bemærk nummeret til højre for det sidste datapunkt, men at gøre det gennem VBA er også forholdsvis enkel.

Instruktioner


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

•  Start et nyt VBA-projekt fil ved at højreklikke på din projektmappe på højre hånd menuen og vælge "Ny" valgmulighed.

•  Start den nye funktion ved at skrive "Sub countRows ()." Dette informerer VBA compiler, at der er en ny subrutine i projektet fil. Hvis du foretrækker at give subrutine andet navn, skal du blot ændre "countRows" til hvad du ønsker at sige, men det skal have den åbne og lukkede parentes bag det, som i "DitNavn ()".

•  Opret en variabel ved at inkludere "Dim Count så lang" i næste linje.

•  Indtast følgende kode: Count = 0 Do Count = Count + 1 ActiveCell.Offset (1, 0) .Select Loop Indtil IsEmpty (ActiveCell.Offset (0, 1)) Dette fortæller compileren programmet først klart ud greven variabel , og derefter begynde at bevæge sig gennem regnearket. Det tilføjer den ene til den samlede Count, bevæger sig derefter ned til den næste celle, så længe den næste celle er tom. Når den når en tom celle, vil den standse.

•  Hent en meddelelsesboks ved at tilføje en ny linje med "MsgBox Count" i det. Dette vil vise en pop-up boks med det totale antal rækker i det. For at gøre Message box synes en smule mere nyttigt, kan du tilføje nogle mere tekst til den. Forandring som følger: MsgBox "Der er" tæller "Rækker" Du kan ændre teksten i anførselstegn til måde uanset hvad du gerne vil have det skal være.

•  Endelig type "End Sub" i en ny linje lukke funktionen ud.

•  Vend tilbage til din Excel-regneark, og gem den.

•  Fremhæv den første celle i kolonnen med flest data. Dette vil være en kolonne, der ikke har nogen tomme celler mellem top og bund.

•  Åbn menuen "Funktioner" og vælg "Makroer" for at opdrage makroer dialog med alle makroer programmeret ind i regnearket.

•  Vælg din makro fra kapitel 1, "countRows" eller hvad navn, du gav det. Klik på "Kør". Når det er færdigt, vil Makro poppe op med besked boks rapport om antallet af rækker du har udfyldt.