Hur infogar jag tomma rader när värdet ändras i Excel?

Om du antar att du har en rad data och nu vill du infoga tomma rader mellan data när värdet ändras, så att du kan separera samma sekventiella värden i en kolumn som följande skärmdumpar visas. I den här artikeln kommer jag att prata om några knep för att lösa detta problem.

Infoga tomma rader när värdet ändras med delsumma-funktionen

Infoga specifikt antal tomma rader när värdet ändras med en kraftfull funktion

Infoga tomma rader när värdet ändras med hjälpkolumner

Infoga tomma rader när värdet ändras med VBA-kod

Infoga tomma rader när värdet ändras med delsumma-funktionen

Med Summa funktion kan du infoga tomma rader mellan data när värdet ändras enligt följande steg:

1. Välj det dataområde du vill använda.

2. Klicka Data > Summa att öppna Summa dialogrutan och i Summa gör följande alternativ:

1: Välj kolumnnamnet som du vill infoga tomma rader baserat på när värdet ändras under Vid varje byte i avsnitt;

2: Välj Att Räkna från Använd funktionen rullgardinsmeny;

3: Kontrollera kolumnnamnet som du vill infoga delsumman till i Lägg till delsumma till listrutan

3. Klicka sedan OK, delsumminraderna har infogats mellan de olika produkterna och kontursymbolerna visas till vänster om tabellen, se skärmdump:

4. Och klicka sedan på siffran 2 högst upp på kontursymbolen för att bara visa delsumminraderna.

5. Välj sedan data för delsumman och tryck på Alt +; snabbtangenter för att endast välja de synliga raderna, se skärmdump:

6. När du bara har valt de synliga raderna, tryck sedan på Radera på tangentbordet och alla delsumma rader har tagits bort.

7. Klicka sedan på någon annan cell och gå tillbaka Data > Dela upp > Rensa konturer för att ta bort konturerna, se skärmdump:

8. Kontursymbolerna har rensats på en gång och du kan se att tomma rader har infogats mellan data när värdet ändras, se skärmdump:

9. Äntligen kan du radera kolumn A efter behov.

Infoga specifikt antal tomma rader när värdet ändras med en kraftfull funktion

Om du prövas med ovanliga besvärliga metoder kommer jag här att presentera ett användbart verktyg, Kutools för Excel's Skillnad mellan skillnader kan hjälpa dig att infoga sidbrytning, tomma rader, nedre kant eller fylla färg när cellvärdet ändras snabbt och enkelt.

När du har installerat Kutools för Excel, gör så här:

1. Klicka Kutools > bildad > Skillnad mellan skillnader, se skärmdump:

2. I Skillnad på nyckelkolumn dialogrutan, gör följande:

• Välj det dataområde som du vill använda och välj sedan nyckelkolumnen som du vill infoga tomma rader baserat på;
• Kontrollera sedan Tom rad alternativ från Tillbehör avsnittet och ange antalet tomma rader som du vill infoga.

3. Klicka sedan Ok knappen och det specifika antalet tomma rader har infogats i data om cellvärdet ändras, se skärmdumpar:

Klicka för att ladda ner Kutools för Excel och gratis testversion nu!

Infoga tomma rader när värdet ändras med hjälpkolumner

Med hjälpkolumnerna kan du först infoga formel och sedan använda Sök och ersätt funktion, äntligen infoga de tomma raderna mellan de ändrade värdena. Gör så här:

1. Ange den här formeln i en tom cell C3 = A3 = A2och i cell D4 anger du denna formel = A4 = A3, se skärmdump:

2. Välj sedan C3: D4 och dra fyllningshandtaget över till det intervall som du vill använda dessa formler, så får du Sant or Falsk i cellerna, se skärmdump:

3. Och tryck sedan på Ctrl + F nycklar för att öppna Sök och ersätt dialogrutan, i dialogrutan poppade ut, ange FALSK i Hitta det textruta under hitta fliken och klicka på Tillbehör för att expandera den här dialogrutan och välj Värden från Titta in rullgardinsmeny, se skärmdump:

4. Klicka Hitta alla och tryck sedan på Ctrl + A för att välja alla resultat för att hitta, har alla FALSE-celler valts på en gång, se skärmdump:

6. Stäng Sök och ersätt dialog, nästa steg, kan du infoga tomma rader genom att klicka Home > Insert > Infoga arkrader, och tomma rader har infogats i data när värdet ändras baserat på kolumn A, se skärmdumpar:

7. Slutligen kan du radera hjälpkolumnen C och D efter behov.

Infoga tomma rader när värdet ändras med VBA-kod

Om du är trött på att använda ovanstående metoder, här är en kod som också kan hjälpa dig att infoga tomma rader mellan de ändrade värdena på en gång.

1. Håll ner ALT + F11 nycklar för att öppna Microsoft Visual Basic for Applications-fönstret.

2. Klicka Insert > Modulernaoch klistra in följande kod i Modulfönster.

VBA-kod: Infoga tomma rader när värdet ändras

Sub InsertRowsAtValueChange()
'Update by Extendoffice
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Application.ScreenUpdating = False
For i = WorkRng.Rows.Count To 2 Step -1
    If WorkRng.Cells(i, 1).Value <> WorkRng.Cells(i - 1, 1).Value Then
        WorkRng.Cells(i, 1).EntireRow.Insert
    End If
Next
Application.ScreenUpdating = True
End Sub

3. Tryck sedan på F5 nyckel för att köra den här koden, och en snabbruta dyker upp för att låta dig välja en kolumninformation som du vill infoga tomma rader när värdet ändras som du baserar på, se skärmdump:

4. Och klicka sedan på OKhar de tomma raderna infogats mellan data när värdet ändras baserat på kolumn A.