Slett tomme rader - VBA -kodeeksempler

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

Du vil bidra til utvikling av området, dele siden med vennene dine

wave wave wave wave wave