Hur kombinerar jag flera kolumner i en lista i Excel?

För att kombinera eller slå samman flera kolumner i en lång lista, kan du normalt kopiera och klistra in kolumndata en efter en i den angivna kolumnen. Men här kan jag presentera några snabba knep för att lösa denna uppgift i Excel.

Kombinera flera kolumner i en lista med VBA-kod

Kombinera flera kolumner i en lista med Kutools för Excel

Kombinera flera kolumner i en lista med VBA-kod

Utan att upprepa för att kopiera och klistra in kolumndata kan följande VBA-kod hjälpa dig att hantera detta jobb snabbt och enkelt.

1. Håll ner Alt + F11 nycklar i Excel, och det öppnar Microsoft Visual Basic för applikationer fönster.

2. Klicka Insert > Modulernaoch klistra in följande makro i Modulerna Fönster.

VBA-kod: Kombinera eller slå samman flera kolumner i en lista

Sub CombineColumns1()
'updateby Extendoffice
    Dim xRng As Range
    Dim i As Integer
    Dim xLastRow As Integer
    Dim xTxt As String
    On Error Resume Next
    xTxt = Application.ActiveWindow.RangeSelection.Address
    Set xRng = Application.InputBox("please select the data range", "Kutools for Excel", xTxt, , , , , 8)
    If xRng Is Nothing Then Exit Sub
    xLastRow = xRng.Columns(1).Rows.Count + 1
    For i = 2 To xRng.Columns.Count
        Range(xRng.Cells(1, i), xRng.Cells(xRng.Columns(i).Rows.Count, i)).Cut
        ActiveSheet.Paste Destination:=xRng.Cells(xLastRow, 1)
        xLastRow = xLastRow + xRng.Columns(i).Rows.Count
    Next
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 påminna dig om att du väljer det dataområde som du vill kombinera i endast en kolumn, se skärmdump:

4. Och klicka sedan på OK knappen och de valda kolumnerna har sammanfogats till endast en kolumn enligt följande skärmdumpar:

tips: Efter att ha kört den här VBA raderas de ursprungliga uppgifterna i intervallet. Du bör helst kopiera och spara dem på en annan plats först.

Kombinera flera kolumner i en lista med Kutools för Excel

Om du har installerat Kutools för Excel, dess Transformera intervall verktyget kan hjälpa dig att kombinera flera kolumner i en enda kolumn eller en rad.

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

1. Välj kolumndata som du vill kombinera i en lista.

2. Klicka sedan Kutools > Mätområde > Transformera intervall, se skärmdump:

3. I Transformera intervall dialogrutan väljer du Område till enstaka kolumn alternativet och klicka på Ok knapp, se skärmdump:

4. I det följande dök ut Transformera intervall rutan, klicka på en cell där du vill mata ut resultatet, se skärmdump:

5. Klicka sedan OK knappen, har dina valda kolumner kombinerats till en enda kolumn på den angivna platsen du önskade. Se skärmdump:

Ladda ner och gratis testversion Kutools för Excel nu!

Demo: Kombinera flera kolumner i en lista med Kutools för Excel