Brug af tastaturet
Vælg alle skjulte rækker for at slette.
Tryk på Ctrl + 9.
Gå til specialkommando
Vælg en hvilken som helst celle inden for området, der indeholder skjulte rækker.
Fra startmenuen skal du vælge Find og vælg> Gå til speciel.
Vælg indstillingen Blanks.
Vælg OK.
Højreklik.
Højreklik på en af de valgte rækker og vælg Slet i genvejsmenuen.
Fjern hele skjulte rækker ved hjælp af dialogboksen Find og erstat
Vælg en celle, der indeholder skjulte rækker.
Tryk på Ctrl + H genvej for at åbne dialogboksen Find og erstat.
Klik på knappen Indstillinger>> og kontroller, om rullemenuen Søg i viser Hele projektmappen. Hvis ikke, vælg det.
Skriv ^~ i tekstfeltet Find hvad.
Lad tekstboksen Erstat med tom.
Klik på Find alle.
Vælg alle.
Klik på knappen Erstat alle.
UDF-metode til at slette skjulte rækker
Vælg en hvilken som helst celle.
Vælg Definer navn på fanen Formler.
Indtast Delete_Rows i tekstboksen Navn.
Indtast følgende formel i feltet Refererer til.
`Public Function Delete_Rows() As Boolean Dim ws As Worksheet For Every ws In ThisWorkbook.Worksheets If Not ws.Visible Then Application.DisplayAlerts =False ws.Visible =True ws.Delete 'Application.DisplayAlerts =True ElseVisiblesIf ws. Næste ws Delete_Rows =True End Function`
Klik på OK.
Vælg de synlige rækker, der ikke indeholder skjulte rækker, og klik på F5 for at åbne dialogboksen Gå til.
Vælg indstillingen Formler på rullelisten Special, og klik på OK.
Tryk på Ctrl + C.
Vælg en hvilken som helst celle.
Tryk på Ctrl + H for at åbne dialogboksen Find og erstat.
Klik på knappen Indstillinger>>.
Vælg Efter værdier på rullelisten Søg.
Klik på OK.
Højreklik på den aktive celle, og vælg Indsæt speciel fra kontekstmenuen.
Vælg Formler under Indsæt.
Klik på OK.
Klik på knappen Erstat alle.
Gem din projektmappe med et andet filnavn for at beholde en sikkerhedskopi.
