Indholdsfortegnelse
Slet tomme rækker
Den oplagte måde at fjerne tomme rækker fra et datasæt er blot at sortere dataene. Dette flytter de tomme rækker til bunden af dataene og "fjerner" dem. Men hvad nu hvis du vil fjerne de tomme rækker, men du ikke vil have dataene sorteret? VBA.
Den følgende makro fjerner tomme rækker uden sortering (deaktiver skærmopdatering for at gå hurtigere).
Sub DeleteBlankRows () Dim x As Long With ActiveSheet For x = .Cells.SpecialCells (xlCellTypeLastCell) .Række til 1 Trin -1 Hvis WorksheetFunction.CountA (.Rows (x)) = 0 Herefter ActiveSheet.Rows (x) .Slet Slut Hvis Next End With End Sub
