Inhoud
Soms moeten we het aantal rijen kennen dat in een Excel-spreadsheet wordt gebruikt, zodat we een formule of zelfs een VBA-macro kunnen maken. Gelukkig zijn er enkele redelijk eenvoudige manieren om dit te doen en Excel VBA is slechts een van hen.De gemakkelijkste manier om deze informatie te achterhalen is om naar de onderkant van uw werkblad te gaan en naar het nummer rechts van het laatste gegevenspunt te kijken; Met VBA is deze berekening echter uiterst eenvoudig.
routebeschrijving
-
Open uw Excel-werkblad en de VBA-editor door op "Alt + F11" te drukken.
-
Start een nieuw VBA-projectbestand door met de rechtermuisknop op uw werkmap te klikken, weergegeven in het menu aan de rechterkant en "Nieuw" te kiezen.
-
Start de nieuwe functie door "Sub CountRows ()" te typen. Dit vertelt de VBA-compiler dat er een nieuwe subroutine is voor het projectbestand. Als u de naam van de subroutine liever wijzigt, wijzigt u de tekst "CountRows" in een willekeurige naam, gevolgd door de hierboven getoonde haakjes, bijvoorbeeld "YourName ()".
-
Maak een variabele met de tekst "Dim Count as Long" op de volgende regel.
-
Voer de volgende code in:
Count = 0 Count = Count + 1 ActiveCell.Offset (1, 0). Selecteer Loop until IsEmpty (ActiveCell.Offset (0, 1))
Dit informeert het compilatieprogramma dat het nodig is om de telvariabele te ontleden en vervolgens de rijen van het volledige werkblad te tellen. De code voegt een variabele toe aan het totale aantal en gaat vervolgens naar de volgende cel zolang deze leeg is. Wanneer het een lege cel bereikt, stopt de uitvoering.
-
Activeer een tekstvak door een nieuwe regel toe te voegen met de tekst "MsgBox Count". Hierdoor wordt een pop-upvenster weergegeven met het totale aantal rijen. Om de box iets nuttiger te maken, kunt u aanvullende tekst invoeren. Hernoem regel naar:
MsgBox "Er zijn" [count number] "lines"
U kunt de tekst naar wens tussen aanhalingstekens wijzigen.
-
Typ tot slot "End Sub" in een nieuwe regel om de subroutine-functie af te sluiten.
De macro plannen
-
Ga terug naar je Excel-werkblad en sla het op.
-
Markeer de eerste kolomcel die het grootste aantal gegevens bevat. Deze kolom mag geen lege cellen van boven naar beneden bevatten.
-
Open het menu "Extra" en selecteer "Macro's" om een dialoogvenster weer te geven met alle macro's die zijn geprogrammeerd voor het werkblad.
-
Selecteer de macro gemaakt in Sectie 1, met de naam "CountRows" of een andere naam die u hebt opgegeven, en klik op "Uitvoeren". Als het klaar is, geeft de macro een pop-up tekstvak weer dat u het aantal gevulde rijen vertelt
De macro uitvoeren
tips
- Als u alleen een nummer nodig heeft, is een eenvoudiger en eenvoudiger alternatief om de rijen te tellen met behulp van een formule. Typ in een lege cel "= COUNT (A: A, IF (A> 0,1,0))", waarbij A de kolom is waarvan het aantal rijen wordt geteld.