Slette tomme rækker i excel

Du har vist allerede et ? om dette. Denne trial varer i 15 dage (angiveligt):

http://www.digdb.com
http://www.digdb.com/excel_add_ins/delete_blank_hidden_rows_columns_sheets/

Ja, jeg har et andet åbent om dette, men jeg skal bug den hjælp nu - så derfor.

Brug det svar, olsen205 har fremsat i dit første spørgsmål. Du får ikke hurtigere respons ved at gentage dine spørgsmål

Du kan med makro bruge noget i retning af:
Selection.EntireRow.Delete

Så vil den slette del rækken for den celle du har valgt. Jeg er lidt usikker på hvad der sker hvis du har valgt flere rækker, men det kan du teste.

Hvis jeg nu også skal have felter væk med eksisterende mellemrum(space) uden tekst - hvad gør man så?

Lav en søg erstat på mellemrum. Erstat det med ingenting.

Yes, men hvis der er mellemrum mellem ordene, forsvinder mellemrummet så der f.eks. kommer til at stå MultigreenA/S, Anderupvej58 - så makroen skal gøre på linjer hvor der ikke står noget i.

No, hvis du markerer 'Søg efter hele cellens indhold' vil den ikke fjerne mellemrum i eksisterende tekst.

Den mulighed findes ihvertfald i Office 2003.

Kode:

    Cells(1, 1).Select
    Cells.Replace What:=" ", Replacement:="", LookAt:=xlWhole, SearchOrder _
        :=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False

Prøv dette:

Sub DeleteEmptyRows()
    LastRow = ActiveSheet.UsedRange.Row - 1 + _
        ActiveSheet.UsedRange.Rows.Count
    Application.ScreenUpdating = False
    For r = LastRow To 1 Step -1
        If Application.CountA(Rows(r)) = 0 Then Rows(r).Delete
    Next r
End Sub

Du skal markere området først, så fjerner den selv (helt tomme) rækker.

Jeg prøver lige...

Det kan jeg ikke få til at virke.
Der sker ikke rigtig noget med filen.

Yes det virker nu!
Smid nogle svar!

Jeps. Godt det virker :=)