Direkt zum Inhalt

Wie kann man eine Pivot-Tabelle in Excel umkehren?

doc-reverse-pivottable-1
Wollten Sie schon immer die Pivot-Tabelle in Excel umkehren oder transponieren, genau wie in den folgenden Screenshots. Jetzt werde ich Ihnen die schnellen Möglichkeiten zum Umkehren einer Pivot-Tabelle in Excel erläutern.
(11 Schritte) Pivot-Tabelle mit PivotTable und PivotChart-Assistenten umkehren
(7 Schritte) Drehen Sie die Pivot-Tabelle mit Kutools für die Transponierten Tabellenabmessungen von Excel um gute Idee3

Pfeil blau rechte Blase Reverse Pivot-Tabelle mit PivotTable und PivotChart Wizard

Um die Pivot-Tabelle umzukehren, müssen Sie zuerst das Dialogfeld PivotTable und PivotChart-Assistent öffnen und eine neue Pivot-Tabelle in Excel erstellen.

1. Drücken Sie Alt + D + P. Überprüfen Sie die Tastenkombinationen zum Öffnen des Dialogfelds PivotTable und PivotChart-Assistent Mehrere Konsolidierungsbereiche Option unter Wo sind die Daten, die Sie analysieren möchten? Abschnitt und PivotTabelle Option unter Welche Art von Bericht möchten Sie erstellen? .

Note: Sie können auch den Befehl PivotTabe und PivoChart Wizard zur Symbolleiste für den Schnellzugriff hinzufügen und auf klicken, um das Dialogfeld zu öffnen.

doc-reverse-pivottable-2

2 Klicken Weiter um zum nächsten zu überprüfenden Dialogfeld zu gelangen Ich werde die Seitenfelder erstellen Option und klicken Sie auf Weiter.

doc-reverse-pivottable-3

3. Wählen Sie Ihre Basisdaten aus und klicken Sie auf Speichern um den Datenbereich zum hinzuzufügen Alle Bereiche Liste. Siehe Screenshot:

doc-reverse-pivottable-4

4 Klicken Weiter Um zum letzten Schritt des Assistenten zu gelangen, aktivieren Sie die Option, die Sie unter benötigen Wo möchten Sie den PivotTable-Bericht ablegen? Sektion. Dann klick Endziel.

doc-reverse-pivottable-5

5. Jetzt wird eine neue Pivot-Tabelle erstellt. Doppelklicken Sie auf die letzte Zelle in der rechten unteren Ecke der neuen Pivot-Tabelle. Anschließend wird eine neue Tabelle in einem neuen Arbeitsblatt erstellt. Siehe Screenshots:
doc-reverse-pivottable-6

iv>

6. Erstellen Sie dann eine neue Pivot-Tabelle basierend auf dieser neuen Tabelle. Wählen Sie die gesamte neue Tabelle aus und klicken Sie auf Insert > PivotTabelle > PivotTabelle.

doc-reverse-pivottable-7

7. Aktivieren Sie dann im Popup-Dialogfeld die Option, die Sie unter benötigen Wählen Sie aus, wo der PivotTable-Bericht platziert werden soll .

doc-reverse-pivottable-8

8 Klicken OK. Dann ein PivotTable-Feldliste Das Fenster wird angezeigt, und ziehen Sie das Fenster Reihe und Kolonne Felder zum Zeilenbeschriftungen Abschnitt und Feld Wert bis Werte Sektion. Siehe Screenshot:

doc-reverse-pivottable-9

9. Klicken Sie dann auf eine beliebige Zelle der neuen Pivot-Tabelle und gehen Sie zu Design Klicken Sie auf die Registerkarte Berichtslayout> In tabellarischer Form anzeigen.

doc-reverse-pivottable-10

10. Klicken Sie dann auf Berichtslayout erneut zu klicken Wiederholen Sie alle Artikelbezeichnungen von der Liste. Siehe Screenshot:

doc-reverse-pivottable-11

Note: Das ist nein Wiederholen Sie alle Artikelbezeichnungen Befehl in der Dropdown-Liste von Berichtslayout Klicken Sie in Excel 2007 auf diese Schaltfläche. Überspringen Sie einfach diesen Schritt.

11 Klicken Design > Zwischensummen > Zwischensummen nicht anzeigen.

doc-reverse-pivottable-12

Jetzt ist die Pivot-Tabelle umgekehrt. Siehe Screenshot:

doc-reverse-pivottable-13

Pfeil blau rechte Blase Reverse-Pivot-Tabelle mit Kutools für Excel Transponierte Tabellenabmessungen

Mit dem obigen Weg gibt es so viele Schritte, um die Aufgabe zu lösen. Um Ihre Arbeitseffizienz erheblich zu verbessern und die Arbeitszeit zu verkürzen, empfehle ich Ihnen, die Pivot-Tabelle mit umzukehren Kutools for Excel Transponieren Sie die Tischabmessungen -Funktion

1. Wählen Sie die Basisdaten aus und klicken Sie auf Kutoolen > Abdeckung > Transponieren Sie die Tischabmessungen.

doc rückwärts schwenkbar 20

2. In dem Transponieren Sie die Tischabmessungen Dialog, überprüfen Kreuztabelle zur Liste für Transponiertyp Wählen Sie dann die Zelle aus, in die Sie die neue Tabelle einfügen möchten.

Excel-Add-In-Tool zum Ändern der 2d-Tabelle in 1d

3 Klicken Ok um eine neue Tabelle zu erstellen, und fügen Sie dann Überschriften über der neuen Tabelle ein. Siehe Screenshot:

doc-reverse-pivottable-16

4. Wählen Sie die neue Tabelle einschließlich der Überschriften aus und klicken Sie auf Insert > PivotTabelle > PivotTabelledann in der PivotTable erstellen Aktivieren Sie im Dialogfeld die Option, die Sie unter benötigen Wählen Sie aus, wo der PivotTable-Bericht platziert werden soll .

doc-reverse-pivottable-17

5 Klicken OKUnd in PivotTable-Feldliste Fenster, ziehen Reihe und Kolonne Felder zu Zeilenbeschriftungen Abschnitt und Wert Feld zu Werte .
doc-reverse-pivottable-9

6. Klicken Sie auf eine beliebige Zelle der neuen Pivot-Tabelle und klicken Sie auf Design > Berichtslayout > In tabellarischer Form anzeigen, dann klick Berichtslayout erneut zu klicken Wiederholen Sie alle Artikelbezeichnungen. Siehe Screenshots:

doc-reverse-pivottable-10doc-reverse-pivottable-11

Note: Das ist nein Wiederholen Sie alle Artikelbezeichnungen Befehl in der Dropdown-Liste der Schaltfläche Berichtslayout in Excel 2007, überspringen Sie ihn einfach.

7 Klicken Design > Zwischensummen > Zwischensummen nicht anzeigen.

doc-reverse-pivottable-12

Jetzt ist die Pivot-Tabelle umgekehrt. Siehe Screenshot:

doc-reverse-pivottable-19

Mit der Kutools for Excel Transponieren Sie die Tischabmessungen Mit dieser Funktion können Sie auch eine Listentabelle in eine Kreuztabelle konvertieren. Klicken Sie hier, um weitere Informationen zu erhalten.

Transponieren Sie die Kreuztabelle schnell in eine Liste oder umgekehrt
Wie können Sie schnell damit umgehen, während Sie ein Blatt mit Kreuztabelle erhalten, das Sie in eine Listentabelle konvertieren müssen? Mit Kutools für Excel's Transponieren Sie die Tischabmessungen Im Dienstprogramm können Sie die Kreuzdimensionstabelle so schnell wie möglich in eine Tabelle mit drei Abmessungen umwandeln oder umgekehrt.   Klicken Sie hier für eine 30-tägige kostenlose Testversion mit vollem Funktionsumfang!
doc transponieren Kreuz in Liste
 
Kutools für Excel: Mit mehr als 300 praktischen Excel-Add-Ins können Sie diese innerhalb von 30 Tagen ohne Einschränkung testen.

Relative Artikel:

Beste Office-Produktivitätstools

🤖 Kutools KI-Assistent: Revolutionieren Sie die Datenanalyse basierend auf: Intelligente Ausführung   |  Code generieren  |  Erstellen Sie benutzerdefinierte Formeln  |  Analysieren Sie Daten und erstellen Sie Diagramme  |  Rufen Sie Kutools-Funktionen auf...
Beliebte Funktionen: Suchen, markieren oder identifizieren Sie Duplikate   |  Leere Zeilen löschen   |  Kombinieren Sie Spalten oder Zellen, ohne Daten zu verlieren   |   Runde ohne Formel ...
Super-Lookup: VLookup mit mehreren Kriterien  |   VLookup mit mehreren Werten  |   VLookup über mehrere Blätter hinweg   |   Unscharfe Suche ....
Erweiterte Dropdown-Liste: Erstellen Sie schnell eine Dropdown-Liste   |  Abhängige Dropdown-Liste   |  Mehrfachauswahl Dropdown-Liste ....
Spaltenmanager: Fügen Sie eine bestimmte Anzahl von Spalten hinzu  |  Spalten verschieben  |  Schalten Sie den Sichtbarkeitsstatus ausgeblendeter Spalten um  |  Vergleichen Sie Bereiche und Spalten ...
Ausgewählte Funktionen: Rasterfokus   |  Designansicht   |   Große Formelleiste   |  Arbeitsmappen- und Blattmanager   |  Ressourcen (Autotext)   |  Datumsauswahl   |  Arbeitsblätter kombinieren   |  Zellen verschlüsseln/entschlüsseln   |  Senden Sie E-Mails nach Liste   |  Superfilter   |   Spezialfilter (Filter fett/kursiv/durchgestrichen...) ...
Top 15 Toolsets:  12 Text Tools (Text hinzufügen, Zeichen entfernen, ...)   |   50+ Chart Typen (Gantt-Diagramm, ...)   |   40+ Praktisch Formeln (Berechnen Sie das Alter basierend auf dem Geburtstag, ...)   |   19 Einfügen Tools (QR-Code einfügen, Bild aus Pfad einfügen, ...)   |   12 Umwandlung (Conversion) Tools (Zahlen zu Wörtern, Currency Conversion, ...)   |   7 Zusammenführen & Teilen Tools (Erweiterte Zeilen kombinieren, Zellen teilen, ...)   |   ... und mehr

Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über 300 erweiterte Funktionen, um die Produktivität zu steigern und Zeit zu sparen.  Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen ...

Beschreibung

Office Tab Bringt die Oberfläche mit Registerkarten in Office und erleichtert Ihnen die Arbeit erheblich

  • Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
  • Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
  • Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!
Comments (1)
No ratings yet. Be the first to rate!
King Storm
King Storm
This comment was minimized by the moderator on the site
VBA code:

Sub Unpivot()
'
Dim Rowlabel As Range
Dim Columnlabel As Range
Dim Pap As Range
Dim Tabl As Range
Dim i As Integer
Dim j As Integer
Dim a As Integer
Dim b As Integer
Dim Data As Range
Dim k As Integer
Dim Label As Range
Dim pvtCache As PivotCache
Dim pvt As PivotTable
Dim SrcData As String
'
ActiveSheet.Copy Before:=Worksheets(1)
Set Tabl = Selection
For Each Pap In Tabl
If Pap.MergeCells Then
With Pap.MergeArea
.UnMerge
.Value = Pap.Value
End With
End If
Next
i = Application.InputBox("So dong chua label", "Hoang", i, Type:=2)
j = Application.InputBox("So cot chua label", "Hoang", j, Type:=2)
On Error Resume Next
Sheets("Unpivot_Table").Delete
Sheets.Add.Name = "Unpivot_Table"
Set Pap = Range("Unpivot_Table!B2")
b = Tabl.Rows.Count
a = Tabl.Columns.Count
Set Data = Range(Tabl.Cells(i + 1, j + 1), Tabl.Cells(b, a))
Set Columnlabel = Range(Tabl.Cells(i + 1, 1), Tabl.Cells(b, j))
Set Rowlabel = Range(Tabl.Cells(1, j + 1), Tabl.Cells(i, a))
Pap.Select
For Each Column In Data.Columns
Column.Copy
Selection.PasteSpecial Paste:=xlPasteValues
Columnlabel.Copy
Selection.Offset(0, 1).PasteSpecial Paste:=xlPasteValues
Column.Copy
Selection.Offset(b - i, -1).Select
Next Column
Pap.Offset(0, j + 1).Select
For Each Column In Rowlabel.Columns
Column.Copy
Range(Selection, Selection.Offset(b - i - 1, 0)).PasteSpecial Paste:=xlPasteValues, Transpose:=True
Selection.End(xlDown).Offset(1, 0).Select
Next Column
Set Label = Range(Pap.Offset(-1, 0), Pap.Offset(0, i + j + 1))
For k = 1 To i + j + 1
Label.Cells(1, k).Value = Application.InputBox(Label.Cells(2, k).Value & " la", "Hoang", k, Type:=2)
Next
Range(Pap.End(xlUp), Pap.End(xlDown).End(xlToRight)).Select
SrcData = ActiveSheet.Name & "!" & Selection.Address
On Error Resume Next
Sheets("Pivot").Delete
Sheets.Add.Name = "Pivot"
Set pvtCache = ActiveWorkbook.PivotCaches.Create( _
SourceType:=xlDatabase, _
SourceData:=SrcData)
Set pvt = pvtCache.CreatePivotTable( _
TableDestination:="Pivot!" & Sheets("Pivot").Range("A3").Address(ReferenceStyle:=xlR1C1), _
TableName:="PivotTable1")
End Sub
Reply
0
0
There are no comments posted here yet
Please leave your comments in English
Guest
Posting as Guest
×
Rate this post:
Reset
0   Characters
Suggested Locations