Inhoudsopgave
Lege rijen verwijderen
De voor de hand liggende manier om lege rijen uit een gegevensset te verwijderen, is door de gegevens eenvoudig te sorteren. Dit verplaatst de lege rijen naar de onderkant van de gegevens en "verwijdert" ze. Maar wat als u wilt dat de lege rijen worden verwijderd, maar u wilt niet dat de gegevens worden gesorteerd? VBA.
De volgende macro verwijdert lege rijen zonder te sorteren (schakel het bijwerken van het scherm uit om sneller te gaan).
Sub DeleteBlankRows() Dim x zo lang met ActiveSheet For x = .Cells.SpecialCells(xlCellTypeLastCell).Row To 1 Step -1 If WorksheetFunction.CountA(.Rows(x)) = 0 Then ActiveSheet.Rows(x).Delete End Als Volgende Einde Met Einde Sub