Innehållsförteckning
Den här korta handledningen förklarar hur du tar bort varannan rad i Excel genom filtrering eller med VBA-kod. Du lär dig också hur du tar bort var tredje, fjärde eller någon annan N:e rad.
Det finns många situationer då du kan behöva ta bort alternativa rader i Excel-arbetsblad, till exempel om du vill behålla data för jämna veckor (raderna 2, 4, 6, 8 osv.) och flytta alla udda veckor (raderna 3, 5, 7 osv.) till ett annat blad.
Att ta bort varannan rad i Excel går i allmänhet ut på att välja alternativa rader. När raderna väl är markerade kan du med ett enkelt streck på Ta bort Det räcker med att trycka på knappen Det är allt som behövs. I den här artikeln får du lära dig några tekniker för att snabbt välja och ta bort varannan eller varannan N:e rad i Excel.
Hur du tar bort varannan rad i Excel genom filtrering
Ett vanligt sätt att radera varannan rad i Excel är följande: först filtrerar du alternativa rader, sedan markerar du dem och raderar alla rader på en gång. De detaljerade stegen följer nedan:
- Skriv in en sekvens av nollor och ettor i en tom kolumn bredvid dina ursprungliga data. Du kan snabbt göra detta genom att skriva 0 i den första cellen och 1 i den andra cellen, sedan kopiera de två första cellerna och klistra in dem i kolumnen fram till den sista cellen med data.
Alternativt kan du använda den här formeln:
=MOD(ROW(),2)
Formelns logik är mycket enkel: ROW-funktionen returnerar det aktuella radnumret, MOD-funktionen dividerar det med 2 och returnerar resten avrundat till heltal.
Resultatet blir 0 i alla jämna rader (eftersom de delas jämnt med 2 utan rest) och 1 i alla udda rader:
- Beroende på om du vill ta bort jämna eller udda rader, filtrera bort ettor eller nollor.
För att göra det väljer du en cell i din hjälparkolumn, går till Uppgifter flik> Sortera och filtrera gruppen och klicka på Filter Pilarna i rullgardinsfiltret visas i alla rubrikceller. Du klickar på pilknappen i kolumnen Hjälpare och kryssar i en av rutorna:
- 0 för att radera jämna rader
- 1 för att radera udda rader
I det här exemplet ska vi ta bort rader med "0"-värden, så vi filtrerar dem:
- Nu när alla "1"-rader är dolda markerar du alla synliga "0"-rader, högerklickar på markeringen och klickar på Radera rad :
- Ovanstående steg har lämnat dig med en tom tabell, men oroa dig inte, "1"-raderna finns fortfarande kvar. För att göra dem synliga igen tar du helt enkelt bort det automatiska filtret genom att klicka på Filter knappen igen:
- Formeln i kolumn C räknas om för de återstående raderna, men du behöver den inte längre. Du kan nu ta bort hjälparkolumnen:
Resultatet är att endast de jämna veckorna finns kvar i vårt arbetsblad, de udda veckorna är borta!
Tips: Om du vill flytta varannan rad till en annan plats i stället för att ta bort dem helt och hållet, kopiera först de filtrerade raderna och klistra in dem på en ny plats, och ta sedan bort de filtrerade raderna.
Hur man tar bort alternativa rader i Excel med VBA
Om du inte vill slösa din tid på en trivial uppgift som att ta bort varannan rad i dina Excel-arbetsblad kan följande VBA-makro automatisera processen åt dig:
Sub Delete_Alternate_Rows_Excel() Dim SourceRange As Range Set SourceRange = Application.Selection Set SourceRange = Application.InputBox( "Range:" , "Välj intervallet" , SourceRange.Address, Type :=8) If SourceRange.Rows.Count>= 2 Then Dim FirstCell As Range Dim RowIndex As Integer Application.ScreenUpdating = False For RowIndex = SourceRange.Rows.Count - (SourceRange.Rows.Count Mod 2) To 1Steg -2 Set FirstCell = SourceRange.Cells(RowIndex, 1) FirstCell.EntireRow.Delete Next Application.ScreenUpdating = True End If End SubHur du raderar varannan rad i Excel med hjälp av makroet
Infoga makrot i arbetsbladet på vanligt sätt via Visual Basic Editor:
- Tryck Alt + F11 för att öppna fönstret Visual Basic for Applications.
- I den övre menyraden klickar du på Infoga > Modul och klistra in ovanstående makro i Modul
- Tryck på F5-tangenten för att köra makrot.
- En dialogruta öppnas och uppmanar dig att välja ett intervall. Välj din tabell och klicka på OK:
Klart! Alla andra rader i det valda intervallet tas bort:
Hur du raderar varje N:e rad i Excel
För den här uppgiften ska vi utöka den filtreringsteknik som vi har använt för att ta bort varannan rad. Skillnaden ligger i formeln som filtreringen baseras på:
MOD(ROW()- m , n )Var:
- m är radnumret för den första cellen med uppgifter minus 1.
- n är den N:e raden som du vill ta bort
Låt oss säga att dina data börjar på rad 2 och att du vill ta bort var tredje rad. Så i din formel n är lika med 3, och m är lika med 1 (rad 2 minus 1):
=MOD(RAD() - 1, 3)
Om våra uppgifter började i rad 3, då m skulle vara lika med 2 (rad 3 minus 1), och så vidare. Denna korrigering behövs för att numrera raderna i tur och ordning, med början med nummer 1.
Formeln dividerar ett relativt radnummer med 3 och återger återstoden efter divisionen. I vårt fall ger den noll för varje tredje rad eftersom varje tredje radnummer divideras med 3 utan återstoden (3,6,9 osv.):
Och nu utför du de redan bekanta stegen för att filtrera "0"-rader:
- Markera en valfri cell i tabellen och klicka på Filter på knappen på Uppgifter
- Filtrera kolumnen Helper så att endast 0-värden visas.
- Välj alla synliga "0"-rader, högerklicka och välj Radera rad från kontextmenyn.
- Ta bort filtret och ta bort kolumnen Helper.
På samma sätt kan du radera var fjärde, femte eller vilken N:e rad som helst i Excel.
Tips: Om du behöver ta bort rader med irrelevanta data kan följande handledning vara till hjälp: Hur man tar bort rader baserat på cellvärde.
Jag tackar dig för att du läste och hoppas att vi ses på vår blogg igen nästa vecka.