Innholdsfortegnelse
Slett tomme rader
Den åpenbare måten å fjerne tomme rader fra et datasett er å ganske enkelt sortere dataene. Dette flytter de tomme radene til bunnen av dataene og "fjerner" dem. Men hva om du vil fjerne de tomme radene, men du ikke vil at dataene skal sorteres? VBA.
Følgende makro vil fjerne tomme rader uten sortering (slå av oppdatering av skjermen for å gå raskere).
Sub DeleteBlankRows () Dim x As Long With ActiveSheet For x = .Cells.SpecialCells (xlCellTypeLastCell). Gå til 1 trinn -1 Hvis WorksheetFunction.CountA (.Rows (x)) = 0 Deretter ActiveSheet.Rows (x). Slett slutt If Next End With End Sub