Hoe telt u het totale aantal rijen in een Excel-tabel?
In dit artikel leest u hoe u het totale aantal rijen in een opgegeven Excel-tabel telt. Volg hiervoor de onderstaande stappen.
Totaal aantal rijen in een tabel tellen met VBA-code
Totaal aantal rijen in een tabel tellen met VBA-code
De onderstaande VBA-code helpt u het aantal rijen in een opgegeven Excel-tabel te tellen.
1. Druk tegelijkertijd op Alt+F11 om het venster Microsoft Visual Basic for Applications te openen.
2. Klik in het venster Microsoft Visual Basic for Applications op Invoegen > Module. Kopieer en plak vervolgens de onderstaande VBA-code in het Module-venster.
VBA-code: Totaal aantal rijen in een tabel in Excel tellen
Sub CountTableRows()
'Updated by Extendoffice 2017/9/12
Dim xTable As ListObject
Dim xTName As String
On Error Resume Next
xTName = Application.InputBox("Please input the table name:", "KuTools For Excel", , , , , , 2)
Set xTable = ActiveSheet.ListObjects(xTName)
MsgBox "The table has total number of " & xTable.Range.Rows.Count & " rows.", vbInformation, "KuTools For Excel"
Set xTable = Nothing
End Sub 3. Druk op de toets F5 om de code uit te voeren.
4. Voer in het geopende dialoogvenster Kutools voor Excel de naam van de tabel in waarvan u het totale aantal rijen wilt tellen en klik daarna op de knop OK. Zie de schermafbeelding:

5. Er verschijnt nu een ander dialoogvenster Kutools voor Excel waarin wordt weergegeven hoeveel rijen er in deze opgegeven tabel zitten. Klik op de knop OK om af te sluiten.

Gerelateerde artikelen:
- Hoe telt u het aantal cellen tussen twee waarden of datums in Excel?
- Hoe telt u in Excel het aantal cellen met specifieke tekst binnen een selectie?
- Hoe telt u het aantal antwoorden ‘Ja’ of ‘Nee’ in Excel?
- Hoe telt u het aantal cellen dat tekst of een deel van een tekst bevat in Excel?
Beste Office-productiviteitshulpmiddelen
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie zoals nooit tevoren.Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en Tijd besparen.Klik hier om de functie te krijgen die u het meest nodig heeft...
Office Tab brengt een tabbladinterface naar Office en maakt uw werk veel eenvoudiger
- Schakel tabbladbewerking en -lezen in voor Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten aan in nieuwe tabbladen binnen hetzelfde venster, in plaats van in afzonderlijke vensters.
- Verhoogt uw productiviteit met 50 % en bespaart u dagelijks honderden muisklikken!
Alle Kutools-add-ins in één installatieprogramma.
Kutools for Office bundelt add-ins voor Excel, Word, Outlook en PowerPoint, plus Office Tab Pro—ideaal voor teams die met meerdere Office-apps werken.
- Alles-in-één suite— add-ins voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro
- Één installatieprogramma, één licentie— binnen enkele minuten klaar (MSI-geschikt)
- Werkt beter samen— gestroomlijnde productiviteit in alle Office-apps
- 30 dagen volledig functionele proefversie— geen registratie, geen creditcard
- Beste prijs-kwaliteitverhouding— bespaar ten opzichte van het afzonderlijk kopen van add-ins