Note: The other languages of the website are Google-translated. Back to English

Hur vänder man en pivottabell i Excel?

doc-omvänd-svängbar-1
Har du någonsin velat vända eller transponera pivottabellen i Excel precis som nedanstående skärmdumpar. Nu kommer jag att berätta de snabba sätten att vända en pivottabell i Excel.
(11 steg) Omvänd pivottabell med PivotTable och PivotChart Wizard
(7 steg) Omvänd pivottabell med Kutools för Excels transponerande tabelldimensioner bra idé3

pil blå höger bubbla Omvänd pivottabell med PivotTable och PivotChart Wizard

För att vända pivottabellen måste du öppna PivotTable och PivotChart Wizard-dialogrutan först och skapa en ny pivottabell i Excel.

1. Tryck Alt + D + P snabbtangenter för att öppna dialogrutan för pivottabell och pivotdiagram, kontrollera sedan Flera konsolideringsområden alternativet under Var är de data som du vill analysera avsnitt och pivottabellen alternativet under Vilken typ av rapport vill du skapa sektion.

Anmärkningar: Du kan också lägga till kommandot PivotTabe och PivoChart Wizard i snabbåtkomstverktygsfältet och klicka för att öppna dialogrutan.

doc-omvänd-svängbar-2

2. klick Nästa för att gå till nästa dialog för att kontrollera Jag kommer att skapa sidfält alternativet och klicka på Nästa.

doc-omvänd-svängbar-3

3. Välj basdata och klicka sedan på Lägg till för att lägga till dataområdet till Alla intervall lista. Se skärmdump:

doc-omvänd-svängbar-4

4. klick Nästa för att gå till det sista steget i guiden, kontrollera det alternativ du behöver under Var vill du placera pivottabellrapporten sektion. Klicka sedan Finish.

doc-omvänd-svängbar-5

5. Nu skapas en ny pivottabell och dubbelklickar på den sista cellen i det nedre högra hörnet av den nya pivottabellen, sedan skapas en ny tabell i ett nytt kalkylblad. Se skärmdumpar:
doc-omvänd-svängbar-6

iv>

6. Skapa sedan en ny pivottabell baserat på den här nya tabellen. Välj den helt nya tabellen och klicka Insert > pivottabellen > pivottabellen.

doc-omvänd-svängbar-7

7. Kontrollera sedan det alternativ du behöver under poppdialogen Välj var du vill att pivottabellrapporten ska placeras sektion.

doc-omvänd-svängbar-8

8. klick OK. Då en Pivottabellfältlista visas och drar Rad och Kolumn fält till Radetiketter avsnitt och Värde-fält till Värden sektion. Se skärmdump:

doc-omvänd-svängbar-9

9. Klicka sedan på valfri cell i den nya pivottabellen och gå till Designa flik för att klicka på Rapportlayout> Visa i tabellform.

doc-omvänd-svängbar-10

10. Gå sedan till klicka Rapportlayout igen för att klicka Upprepa alla artikeletiketter från listan. Se skärmdump:

doc-omvänd-svängbar-11

Anmärkningar: Detta är nej Upprepa alla artikeletiketter kommandot i listrutan över Rapportlayout knappen i Excel 2007, hoppa över det här steget.

11. klick Designa > delsummor > Visa inte delsummor.

doc-omvänd-svängbar-12

Nu är pivottabellen omvänd. Se skärmdump:

doc-omvänd-svängbar-13


pil blå höger bubbla Omvänd pivottabell med Kutools för Excel: s Transpose Table Dimensions

Med ovanstående sätt finns det så många steg för att lösa uppgiften. För att avsevärt förbättra din arbetseffektivitet och minska arbetstiden föreslår jag att du vänder pivottabellen med Kutools för ExcelÄr Transponera bordsmått särdrag.

1. Välj basdata och klicka Kutools > Mätområde > Transponera bordsmått.

doc omvänd svängbar 20

2. I Transponera bordsmått dialogrutan, kontrollera Korsa bordet för att lista under Transponera typ avsnittet och välj sedan cellen du vill lägga till den nya tabellen.

excel-tilläggsverktyg för att ändra 2d-tabell till 1d

3. klick Ok för att skapa en ny tabell och sedan infoga rubriker ovanför den nya tabellen. Se skärmdump:

doc-omvänd-svängbar-16

4. Välj den nya tabellen, inklusive rubrikerna, och klicka Insert > pivottabellen > pivottabellen, sedan i Skapa pivottabell dialogrutan, markera det alternativ du behöver under Välj var du vill att pivottabellrapporten ska placeras sektion.

doc-omvänd-svängbar-17

5. klick OK, och i Pivottabellfältlista ruta, dra Rad och Kolumn fält till Radetiketter avsnitt och Värde fält till Värden sektion.
doc-omvänd-svängbar-9

6. Klicka på valfri cell i den nya pivottabellen och klicka Designa > Rapportlayout > Visa i tabellform, Klicka sedan Rapportlayout igen för att klicka Upprepa alla artikeletiketter. Se skärmdumpar:

doc-omvänd-svängbar-10doc-omvänd-svängbar-11

Anmärkningar: Detta är nej Upprepa alla artikeletiketter kommandot i rullgardinsmenyn med knappen Rapportlayout i Excel 2007, hoppa över det.

7. klick Designa > delsummor > Visa inte delsummor.

doc-omvänd-svängbar-12

Nu är pivottabellen omvänd. Se skärmdump:

doc-omvänd-svängbar-19

Med Kutools för ExcelÄr Transponera bordsmått funktion kan du också konvertera listtabell till tvärbord. Klicka här för att få mer information.


Transportera snabbt tvärbord för att lista eller tvärtom

Medan du får ett ark med tvärbord som du behöver konvertera till listtabell, hur kan du snabbt hantera det? Med Kutools från Excel Transponera bordsmått verktyget kan du konvertera korsdimensionstabell till tre demensionstabeller eller vice versa så fort du kan.   Klicka för 30-dagars fullfjädrad gratis provperiod!
doc transponera kors till lista
 
Kutools för Excel: med mer än 300 praktiska Excel-tillägg, gratis att prova utan begränsningar i 30 dagar.

Relativa artiklar:


De bästa Office-produktivitetsverktygen

Kutools för Excel löser de flesta av dina problem och ökar din produktivitet med 80%

  • återanvändning: Sätt snabbt i komplexa formler, diagram och allt som du har använt tidigare; Kryptera celler med lösenord; Skapa e-postlista och skicka e-post ...
  • Super Formula Bar (enkelt redigera flera rader med text och formel); Läslayout (enkelt läsa och redigera ett stort antal celler); Klistra in i filtrerat intervall...
  • Sammanfoga celler / rader / kolumner utan att förlora data; Delat cellinnehåll; Kombinera duplicerade rader / kolumner... Förhindra duplicerade celler; Jämför intervall...
  • Välj Duplicera eller Unikt Rader; Välj tomma rader (alla celler är tomma); Super Find och Fuzzy Find i många arbetsböcker; Slumpmässigt val ...
  • Exakt kopia Flera celler utan att ändra formelreferens; Skapa referenser automatiskt till flera ark; Sätt in kulor, Kryssrutor och mer ...
  • Extrahera text, Lägg till text, ta bort efter position, Ta bort mellanslag; Skapa och skriva ut personsökningstalsatser; Konvertera mellan celler innehåll och kommentarer...
  • Superfilter (spara och tillämpa filterscheman på andra ark); Avancerad sortering efter månad / vecka / dag, frekvens och mer; Specialfilter av fet, kursiv ...
  • Kombinera arbetsböcker och arbetsblad; Sammanfoga tabeller baserat på nyckelkolumner; Dela data i flera ark; Batchkonvertera xls, xlsx och PDF...
  • Mer än 300 kraftfulla funktioner. Stöder Office / Excel 2007-2021 och 365. Stöder alla språk. Enkel implementering i ditt företag eller organisation. Fullständiga funktioner 30 dagars gratis provperiod. 60 dagars pengarna tillbaka-garanti.
kte-flik 201905

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!
officetab botten
Sortera kommentarer efter
Kommentarer (1)
Inga betyg än. Bli först med att betygsätta!
Denna kommentar minimerades av moderatoren på webbplatsen
VBA-kod:

Sub Unpivot()
'
Dim Rowlabel As Range
Dim kolumnetikett som intervall
Dim Pap As Range
Dim tabell som intervall
Dim jag som heltal
Dim j Som heltal
Dim ett som heltal
Dim b Som heltal
Dim data som intervall
Dim k Som heltal
Dim Label As Range
Dim pvtCache Som PivotCache
Dim pvt som pivottabell
Dim SrcData som sträng
'
ActiveSheet.Copy Before:=Arbetsblad(1)
Set Tabell = Urval
För varje Pap I Tabell
Om Pap.MergeCells Då
Med Pap.MergeArea
.Avsluta
.Value = Pap.Value
Sluta med
End If
Nästa
i = Application.InputBox("So dong chua label", "Hoang", i, Typ:=2)
j = Application.InputBox("So cot chua label", "Hoang", j, Type:=2)
On Error Resume Next
Sheets("Unpivot_Table").Ta bort
Sheets.Add.Name = "Unpivot_Table"
Ställ in Pap = Range("Unpivot_Table!B2")
b = Tabell.Rows.Count
a = Tabell.Kolumner.Antal
Set Data = Range(Tabl.Cells(i + 1, j + 1), Tabl.Cells(b, a))
Ange kolumnetikett = Range(Tabl.Cells(i + 1, 1), Tabl.Cells(b, j))
Ställ in Rowlabel = Range(Tabl.Cells(1, j + 1), Tabl.Cells(i, a))
Pap.Select
För varje kolumn i Data.Columns
Kolumn.Kopiera
Selection.PasteSpecial Paste:=xlPasteValues
Kolumnetikett.Kopiera
Selection.Offset(0, 1).PasteSpecial Paste:=xlPasteValues
Kolumn.Kopiera
Val.Offset(b - i, -1).Välj
Nästa kolumn
Pap.Offset(0, j + 1). Välj
För varje kolumn In Rowlabel.Columns
Kolumn.Kopiera
Range(Selection, Selection.Offset(b - i - 1, 0)). PasteSpecial Paste:=xlPasteValues, Transpose:=True
Selection.End(xlDown).Offset(1, 0).Välj
Nästa kolumn
Set Label = Range(Pap.Offset(-1, 0), Pap.Offset(0, i + j + 1))
För k = 1 Till i + j + 1
Label.Cells(1, k).Value = Application.InputBox(Label.Cells(2, k).Value & " la", "Hoang", k, Type:=2)
Nästa
Range(Pap.End(xlUp), Pap.End(xlDown).End(xlToRight)).Välj
SrcData = ActiveSheet.Name & "!" & Val.Adress
On Error Resume Next
Sheets ("Pivot"). Ta bort
Sheets.Add.Name = "Pivot"
Set pvtCache = ActiveWorkbook.PivotCaches.Create( _
SourceType:=xlDatabas, _
SourceData:=SrcData)
Set pvt = pvtCache.CreatePivotTable( _
TableDestination:="Pivot!" & Sheets("Pivot").Range("A3").Address(ReferenceStyle:=xlR1C1), _
Tabellnamn:="Pivottabell1")
End Sub
Det finns inga kommentarer här ännu
Lämna dina kommentarer
Postar som gäst
×
Betygsätt detta inlägg:
0   Tecken
Föreslagna platser

Följ oss

Copyright © 2009 - www.extendoffice.com. | Alla rättigheter förbehållna. Drivs av ExtendOffice. | | Sitemap
Microsoft och Office-logotypen är varumärken eller registrerade varumärken som tillhör Microsoft Corporation i USA och / eller andra länder.
Skyddad av Sectigo SSL