Een VBA-macro gebruiken om erachter te komen hoeveel rijen en kolommen er in een Excel-tabel worden gebruikt
Afhankelijk van de Excel-versie wordt in een tabel een ander aantal rijen en kolommen aangeboden. Hoe kun je in een macro zien wanneer je alle rijen of kolommen van een tabel wilt herhalen?
Waren er in Excel tot en met versie 2003 slechts 256 kolommen en 65.536 rijen, sinds Excel 2007 zijn er 16.384 kolommen en 1.048.576 rijen beschikbaar.
Er zijn ook verschillende opslagformaten in Excel voor de twee verschillende spreadsheets: XLS en XLSX. Het is echter niet zo dat een XLSX-bestand automatisch de grotere werkbladen moet hebben. Zelfs in Excel 2007 en Excel 2010, wanneer een bestand in compatibiliteitsmodus wordt geopend, zijn alleen de eerdere tabeldimensies beschikbaar.
Als u daarom in een macro wilt bepalen hoeveel rijen en kolommen een werkblad heeft, moet u dit aantal rechtstreeks opvragen. De volgende macro laat zien hoe u dit doet
SubrijUndColumnNumber ()
MsgBox ActiveSheet.Cells.Rows.Count & "Rijen" & _
ActiveSheet.Cells.Columns.Count & "Columns."
Einde sub
Als u de macro oproept met een XLS-werkblad, toont Excel u het bijbehorende aantal rijen en kolommen, zoals weergegeven in de volgende afbeelding:
Als u de macro start vanuit Excel 2007 of Excel 2010 zonder compatibiliteitsmodus, toont een dialoogvenster u de grotere afmetingen van de tabel:
In VBA-lussen die door alle cellen van een tabel moeten lopen, kunt u daarom de twee eigenschappen RIJEN.COUNT en COLUMNS.COUNT gebruiken zoals beschreven om de afmetingen van een werkblad te bepalen.
Het kan lang duren (vooral in Excel 2007 en Excel 2010) om met een macro alle theoretisch beschikbare cellen te doorlopen. Als u alleen lussen wilt beperken tot het gebied dat wordt gebruikt, raden we u aan in plaats daarvan de eigenschap USEDRANGE te gebruiken.
Om de macro in te voeren, drukt u in Excel op de toetscombinatie ALT F11. Hiermee start u de VBA-editor in alle Excel-versies. Selecteer daar de opdracht INSERT - MODULE en voer de macro in. Activeer de toetsencombinatie ALT F8 in Excel om de macro te starten.
