Titta på video - Infoga tom rad efter varje rad i Excel
Människor som arbetar med stora datamängder behöver ofta enkla saker som att infoga/ta bort rader eller kolumner.
Även om det redan finns många olika (och enkla) sätt att lägga till rader i Excel, blir det lite komplicerat när det gäller att infoga en tom rad efter varannan rad (eller var tredje eller fjärde rad).
Infoga en tom rad efter varannan rad
I den här självstudien kommer jag att visa dig några riktigt enkla sätt att infoga en tom rad efter varje rad i den befintliga datamängden (eller var tionde rad).
Eftersom det inte finns något direkt sätt att lägga till rader mellan raderna, är metoden i denna artikel lösningar för att få detta att hända, och om du är bekväm med VBA kan du göra detta med ett enda klick.
Använda hjälpkolumn och sorteringsfunktionen
Anta att du har en dataset som visas nedan och du vill infoga ett tomt mellan de befintliga raderna.
Nedan följer stegen för att infoga tomma rader mellan befintliga rader:
- Infoga en tom kolumn till vänster om datamängden. För att göra detta, högerklicka på kolumnrubriken i kolumnen längst till vänster och klicka på Infoga.
- Ange texten 'HelperColumn' i A1 (du kan använda vilken text du vill)
- Ange 1 i cell A2 och 2 i cell A3.
- Markera båda cellerna och placera markören längst ned till höger om markeringen. När markören ändras till en plusikon dubbelklickar du på den. Detta kommer att fylla hela kolumnen med ökande nummer
- Gå till den senast fyllda cellen i hjälpkolumnen och välj sedan cellen under den.
- Ange 1 i denna cell och 2 i cellen nedanför den
- Markera båda cellerna och placera markören längst ned till höger om markeringen.
- När markören ändras till en plusikon klickar du och drar ner den. Detta fyller en rad nummer (precis som vi fick i steg 3). Se till att du får fler nummer än vad du har i datamängden. Till exempel, om det finns 10 poster i datamängden, se till att få minst 10 celler fyllda i det här steget. När det är klart ser din dataset ut som visas nedan.
- Markera hela datauppsättningen (inklusive alla celler i hjälpkolumnen).
- Klicka på fliken Data
- Klicka på alternativet Sortera
- Använd följande inställningar i dialogrutan Sortera:
- Sortera efter: Hjälpare
- Sortera efter: Cellvärde
- Ordning: Minsta till största
- Klicka på OK. Detta ger dig datauppsättningen enligt nedan.
- Ta bort hjälpkolumnen.
Du skulle märka att så snart du klickar på OK i dialogrutan Sortera, ordnar det omedelbart raderna och nu har du en tom rad efter varje rad i din datamängd.
I verkligheten är det här inte riktigt att infoga en tom rad. Denna sorteringsmetod ordnar helt enkelt om data genom att placera tomma rader under datamängden mellan raderna i datamängden.
Du kan också utöka samma logik till sätt in en tom rad efter varannan rad eller var tredje rad.
Anta att du har datauppsättningen enligt nedan och du vill få en tom rad efter varannan rad.
Nedan följer stegen för att göra detta:
- Infoga en tom kolumn till vänster om datamängden. För att göra detta, högerklicka på kolumnrubriken i kolumnen längst till vänster och klicka på Infoga.
- Ange texten 'HelperColumn' i A1 (du kan använda vilken text du vill)
- Ange 1 i cell A2 och 2 i cell A3.
- Markera båda cellerna och placera markören längst ned till höger om markeringen. När markören ändras till en plusikon dubbelklickar du på den. Detta kommer att fylla hela kolumnen med ökande nummer
- Gå till den senast fyllda cellen i hjälpkolumnen och välj sedan cellen under den.
- Ange 2 i den här cellen och 4 i cellen nedanför den. Vi använder tal i multiplar av 2 eftersom vi vill ha en tom rad efter varannan rad.
- Markera båda cellerna och placera markören längst ned till höger om markeringen.
- När markören ändras till en plusikon klickar du och drar ner den. Detta fyller en rad nummer (precis som vi fick i steg 3). Se till att du får ett nummer större än vad du har i datamängden. Om det till exempel finns 10 poster i datamängden, se till att du får åtminstone till nummer 10.
- Markera hela datamängden (inklusive alla celler i hjälpkolumnen).
- Klicka på fliken Data
- Klicka på alternativet Sortera
- Använd följande inställningar i dialogrutan Sortera:
- Sortera efter: Hjälpare
- Sortera efter: Cellvärde
- Ordning: Minsta till största
- Klicka på OK. Detta ger dig den slutliga datamängden enligt nedan (med en tom rad efter varannan rad i datamängden)
- Ta bort hjälpkolumnen.
På samma sätt, om du vill infoga en tom rad efter var tredje rad, använd siffran 3, 6, 9 och så vidare i steg 5.
Använda en enkel VBA -kod
Medan du behöver många lösningar för att infoga alternativa tomma rader i Excel, med VBA är allt en bit av kakan.
Med en enkel VBA -kod är allt du behöver göra att välja datauppsättningen där du vill infoga en tom rad efter varje rad och helt enkelt köra koden (tar ett enda klick).
Nedan visas VBA -koden som kommer att infoga en tom rad efter varje rad i datamängden:
Sub InsertAlternateRows () 'Denna kod kommer att infoga en rad efter varje rad i urvalet' Denna kod har skapats av Sumit Bansal från trumpexcel.com Dim rng As Range Dim CountRow As Integer Dim i As Integer Set rng = Selection CountRow = rng. EntireRow.Count For i = 1 To CountRow ActiveCell.Offset (1, 0) .EntireRow.Insert ActiveCell.Offset (2, 0) .Välj Next i End Sub
Ovanstående kod räknar det totala antalet rader i urvalet och använder en For Next -slinga för att bläddra igenom varje rad och infoga en tom rad efter varje befintlig rad i datamängden.
Här är stegen för att placera denna VBA -kod i VB -redigeraren i Excel:
- Kopiera ovanstående kod
- Gå till fliken Utvecklare och klicka på Visual Basic -alternativet. Detta öppnar VB Editor. Du kan också använda kortkommandot ALT + F11
- I VB Editor, högerklicka på ett objekt i Project Explorer
- För muspekaren över alternativet Infoga och klicka sedan på Modul. Detta kommer att infoga en ny modul
- Klistra in ovanstående kod i fönstret Modulkod.
När du har koden i VB -redigeraren kan du nu använda den här koden för att infoga tomma rader efter varannan rad i datamängden.
Här är stegen för att använda koden för att infoga tomma rader efter varje rad:
- Välj hela datauppsättningen (utom rubrikraden)
- Klicka på fliken Utvecklare (om du inte har fliken Utvecklare, klicka här för att lära dig hur du får det)
- Klicka på alternativet "Makron"
- Markera makrot i dialogrutan Makro - "InsertAlternateRows"
- Klicka på Kör
Det är allt!
Stegen ovan skulle omedelbart infoga alternerande tomma rader i datamängden.
Det finns många olika sätt att köra ett makro i Excel. Om du till exempel måste göra detta ganska ofta kan du lägga till det här makrot i verktygsfältet Snabbåtkomst så att du kan köra det med ett enda klick.
Du kan läsa mer om olika sätt att köra makron här.
Om du vill infoga en tom rad efter varannan rad kan du använda koden nedan:
Sub InsertBlankRowAfterEvery2ndRow () 'Denna kod kommer att infoga en rad efter varannan rad i urvalet' Denna kod har skapats av Sumit Bansal från trumpexcel.com Dim rng As Range Dim CountRow As Integer Dim i As Integer Set rng = Selection CountRow = rng .EntireRow.Count For i = 1 To CountRow / 2 ActiveCell.Offset (2, 0) .EntireRow.Insert ActiveCell.Offset (3, 0) .Välj Next i End Sub
Hoppas du tyckte att denna handledning var användbar.
