Hur konverterar man en korstabell (2-dimensionell tabell) till en lista i Excel?

Att konvertera en korstabell (tvådimensionell tabell) till en listtabell (endimensionell tabell) i Excel kan vara nödvändigt för olika dataanalysuppgifter. Om du har en tabell med både rad- och kolumnrubriker och behöver förenkla den till en platt lista, finns det effektiva metoder för att uppnå denna transformation. Den här guiden visar hur du snabbt och enkelt konverterar din korstabell till ett mer hanterbart listformat i Excel.

• Konvertera tvärbord till lista i Excel med VBA
• Konvertera tvärbord till lista i Excel med Kutools för Excel

Korstabell (med radrubriker och kolumnrubriker)		En listtabell (endimensionell tabell)

Konvertera tvärbord till lista i Excel med VBA

Följande VBA-makro kan hjälpa dig att snabbt konvertera alla korstabeller i aktiva kalkylblad till platta listor.

Steg 1: Håll ner andra + F11 nycklar i Excel och det öppnar Microsoft Visual Basic for Applications-fönstret.

Steg 2: Klicka Insert > Modulernaoch klistra in följande makro i modulfönstret.

VBA på transponera korsstabell för att lista:

Sub ConvertTableToList()
'Updated by Extendoffice 2024/07/15
Const TEST_COLUMN As String = "A"
Dim i As Long, j As Long
Dim iLastRow As Long
Dim iLastCol As Long
Application.ScreenUpdating = False
With ActiveSheet
iLastRow = .Cells(.Rows.Count, TEST_COLUMN).End(xlUp).Row
For i = iLastRow To 2 Step -1
iLastCol = .Cells(i, .Columns.Count).End(xlToLeft).Column
For j = iLastCol To 3 Step -1
.Rows(i + 1).Insert
.Cells(i + 1, 2).Value = .Cells(i, j).Value
.Cells(i, j).Value = ""
Next j
Next i
.Rows(1).Delete
End With
Application.ScreenUpdating = True
End Sub
  

Steg 3: Klicka på F5 för att köra detta makro.

Då kommer du att se den konverterade listan som följande skärmdump:

Konvertera tvärbord till listor i Excel med Kutools för Excel

Om du har Kutools för Excel installerad kan du använda den Transponera bordsmått verktyg för att snabbt konvertera korstabeller till platta listor.

Steg 1: Välj tabellen som du ska konvertera till en lista.

Steg 2: Klicka på Kutools >Mätområde > Transponera bordsdimension. Se följande skärmdump:

Steg 3: I Transponera bordsmått dialogrutan, kolla på Korsa bordet för att lista och välj Resultatintervall genom att klicka på knapp.

Steg 4: Klicka på OK knapp.

Då ser du att den ursprungliga tabellen konverteras till en platt lista som följande skärmdump:

Transponera bordsmått kan också konvertera listan till en korstabell. För mer information, gå till Transponera bordsmått.

Relativa artiklar:

• Konvertera platt lista till tvådimensionellt tvärbord