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.
Kutools för Excel : med mer än 300 praktiska Excel-tillägg, gratis att prova utan begränsning på 30 dagar. |
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
Bästa kontorsproduktivitetsverktyg
Uppgradera dina Excel-färdigheter med Kutools för Excel och upplev effektivitet som aldrig förr. Kutools för Excel erbjuder över 300 avancerade funktioner för att öka produktiviteten och spara tid. Klicka här för att få den funktion du behöver mest...
Fliken Office ger ett flikgränssnitt till Office och gör ditt arbete mycket enklare
- Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
- Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
- Ökar din produktivitet med 50 % och minskar hundratals musklick för dig varje dag!