Ugrás a tartalomra

Hogyan lehet megfordítani a kimutató táblázatot az Excelben?

doc-fordított-elfordítható-1
Szerette volna már megfordítani vagy átültetni a pivot táblázatot az Excel-ben, mint az alábbi képernyőképek. Most elmondom a pivot tábla megfordításának gyors módjait az Excelben.
(11 lépés) Fordított pivot tábla a PivotTable és a PivotChart Wizard segítségével
(7 lépés) Fordított forgóasztal a Kutools segítségével az Excel transzponált táblázat méreteihez jó ötlet3

nyíl kék jobb buborék Fordított pivot tábla a PivotTable és a PivotChart Wizard segítségével

A pivot tábla megfordításához először meg kell nyitnia a PivotTable és a PivotChart Wizard párbeszédpanelt, és létre kell hoznia egy új pivot táblát az Excelben.

1. nyomja meg Alt + D + P parancsikonok a PivotTable és a PivotChart Wizard párbeszédpanel megnyitásához, majd ellenőrizze Több konszolidációs tartomány opció alatt Hol vannak az elemezni kívánt adatok szakasz és Pivot tábla opció alatt Milyen jelentést szeretne létrehozni szakasz.

Megjegyzések: Hozzáadhatja a PivotTabe és a PivoChart Wizard parancsot a Gyorselérési eszköztárhoz, és kattintson a párbeszédpanel megnyitásához.

doc-fordított-elfordítható-2

2. kettyenés Következő a következő párbeszédpanelre való ugráshoz Létrehozom az oldalmezőket opciót, és kattintson a Következő.

doc-fordított-elfordítható-3

3. Válassza ki az alapadatokat, majd kattintson a gombra hozzáad hogy hozzáadjuk az adattartományt a Minden tartomány lista. Lásd a képernyőképet:

doc-fordított-elfordítható-4

4. kettyenés Következő a varázsló utolsó lépéséhez való visszatéréshez jelölje be a kívánt opciót Hová szeretné tenni a kimutatás táblázatot szakasz. Ezután kattintson befejez.

doc-fordított-elfordítható-5

5. Most létrejön egy új pivot tábla, és kattintson duplán az utolsó cellára az új pivot tábla jobb alsó sarkában, majd egy új tábla jön létre egy új munkalapon. Képernyőképek megtekintése:
doc-fordított-elfordítható-6

iv>

6. Ezután hozzon létre egy új pivot táblázatot ezen új tábla alapján. Válassza ki a teljes új táblázatot, majd kattintson a gombra betétlap > Pivot tábla > Pivot tábla.

doc-fordított-elfordítható-7

7. Ezután a felbukkanó párbeszédpanelen ellenőrizze a kívánt opciót Válassza ki, hol szeretné elhelyezni a kimutatás táblázatot szakasz.

doc-fordított-elfordítható-8

8. kettyenés OK. Aztán a PivotTable mezőlista panel jelenik meg, és húzza a Sor és a Oszlop mezőket a sorcímkék szakasz, és Érték mező Értékek szakasz. Lásd a képernyőképet:

doc-fordított-elfordítható-9

9. Ezután kattintson az új pivot tábla bármely cellájára, és lépjen a Design fülre kattintva kattintson a Jelentéselrendezés> Megjelenítés táblázatos formában elemre.

doc-fordított-elfordítható-10

10. Ezután kattintson a gombra Elrendezés jelentése kattintson ismét Ismételje meg az összes elem címkét a listáról. Lásd a képernyőképet:

doc-fordított-elfordítható-11

Megjegyzések: Ez nem Ismételje meg az összes elem címkét parancs a legördülő listában Elrendezés jelentése gombra az Excel 2007 alkalmazásban, hagyja ki ezt a lépést.

11. kettyenés Design > részösszegek > Ne jelenjen meg részösszeg.

doc-fordított-elfordítható-12

Most az elforduló tábla megfordult. Lásd a képernyőképet:

doc-fordított-elfordítható-13


nyíl kék jobb buborék Fordított pivot tábla a Kutools segítségével az Excel transzponált táblázat méreteihez

A fenti módon annyi lépés van a feladat megoldására. A munka hatékonyságának jelentős javítása és a munkaidő csökkentése érdekében azt javaslom, hogy fordítsa meg a forgástáblát Kutools az Excel számára'S Tegye át a táblázat méreteit funkciót.

1. Válassza ki az alapadatokat, majd kattintson a gombra Kutools > Választék > Tegye át a táblázat méreteit.

doki hátrafelé forgatható 20

2. Ban,-ben Tegye át a táblázat méreteit párbeszédpanelen ellenőrizze Keresztasztal a felsoroláshoz alatt Átültetés típusa szakaszban, majd válassza ki azt a cellát, amelybe fel szeretné tenni az új táblázatot.

excel kiegészítő eszköz a 2d táblázat 1d-re változtatásához

3. kettyenés Ok új tábla létrehozásához, majd fejlécek beszúrását az új tábla fölé. Lásd a képernyőképet:

doc-fordított-elfordítható-16

4. Válassza ki az új táblázatot a fejlécekkel együtt, majd kattintson a gombra betétlap > Pivot tábla > Pivot tábla, majd a Hozzon létre PivotTable-t párbeszédpanelen ellenőrizze a kívánt opciót Válassza ki, hol szeretné elhelyezni a kimutatás táblázatot szakasz.

doc-fordított-elfordítható-17

5. kettyenés OK, és be PivotTable mezőlista ablaktáblán húzza Sor és a Oszlop mezők a sorcímkék szakasz, és Érték mezőt Értékek szakasz.
doc-fordított-elfordítható-9

6. Kattintson az új pivot táblázat bármely cellájára, majd kattintson a gombra Design > Elrendezés jelentése > Megjelenítés táblázatos formában, majd kattintson a gombra Elrendezés jelentése kattintson ismét Ismételje meg az összes elem címkét. Képernyőképek megtekintése:

doc-fordított-elfordítható-10doc-fordított-elfordítható-11

Megjegyzések: Ez nem Ismételje meg az összes elem címkét parancs az Excel 2007 Jelentéselrendezés gomb legördülő listáján, csak hagyja ki.

7. kettyenés Design > részösszegek > Ne jelenjen meg részösszeg.

doc-fordított-elfordítható-12

Most az elforduló tábla megfordult. Lásd a képernyőképet:

doc-fordított-elfordítható-19

A Kutools az Excel számára'S Tegye át a táblázat méreteit funkcióval, a listatáblát is kereszttáblává alakíthatja. Kattintson ide további információkért.


Gyorsan ültesse át a Kereszttáblát listára vagy fordítva

Miközben kap egy táblázatot kereszttáblával, amelyet át kell alakítania listatáblává, hogyan kezelheti gyorsan? Val vel Kutools az Excel-ből Tegye át a táblázat méreteit segédprogram segítségével a dimenziók tábláját három demension táblává alakíthatja, vagy fordítva, amilyen gyorsan csak lehet.   Kattintson a 30 napos teljes értékű ingyenes próbaverzióért!
doc transzponálja a keresztet a listára
 
Kutools for Excel: több mint 300 praktikus Excel-bővítménnyel, 30 napon belül korlátozás nélkül kipróbálható.

Relatív cikkek:

A legjobb irodai hatékonyságnövelő eszközök

🤖 Kutools AI Aide: Forradalmasítsa az adatelemzést a következők alapján: Intelligens végrehajtás   |  Kód létrehozása  |  Hozzon létre egyéni képleteket  |  Adatok elemzése és diagramok létrehozása  |  A Kutools funkciók meghívása...
Népszerű szolgáltatások: Ismétlődések keresése, kiemelése vagy azonosítása   |  Üres sorok törlése   |  Oszlopok vagy cellák kombinálása adatvesztés nélkül   |   Kerek Formula nélkül ...
Szuper keresés: Több kritérium VLookup    Többértékű VLookup  |   VLookup több munkalapon   |   Fuzzy Lookup ....
Speciális legördülő lista: Gyors legördülő lista létrehozása   |  Függő legördülő lista   |  Többszörösen válassza ki a legördülő listát ....
Oszlopkezelő: Adjon meg egy adott számú oszlopot  |  Oszlopok mozgatása  |  Kapcsolja be a Rejtett oszlopok láthatósági állapotát  |  Tartományok és oszlopok összehasonlítása ...
Kiemelt funkciók: Rács fókusz   |  Design nézet   |   Nagy Formula bár    Munkafüzet és lapkezelő   |  Erőforrás-könyvtár (Auto szöveg)   |  Dátumválasztó   |  Kombinálja a munkalapokat   |  Cellák titkosítása/dekódolása    E-mailek küldése listánként   |  Szuper szűrő   |   Speciális szűrő (félkövér/dőlt/áthúzott szűrés...) ...
A 15 legjobb eszközkészlet12 szöveg Eszközök (Szöveg hozzáadása, Karakterek eltávolítása,...)   |   50 + Táblázatos Típusai (Gantt-diagram,...)   |   40+ Praktikus képletek (Számolja ki az életkort a születésnap alapján,...)   |   19 beszúrás Eszközök (Helyezze be a QR-kódot, Kép beszúrása az útvonalból,...)   |   12 Átalakítás Eszközök (Számok szavakig, Valuta átváltás,...)   |   7 Egyesítés és felosztás Eszközök (Haladó kombinált sorok, Hasított sejtek,...)   |   ... és több

Töltsd fel Excel-készségeidet a Kutools for Excel segítségével, és tapasztald meg a még soha nem látott hatékonyságot. A Kutools for Excel több mint 300 speciális funkciót kínál a termelékenység fokozásához és az időmegtakarításhoz.  Kattintson ide, hogy megszerezze a leginkább szükséges funkciót...

Leírás


Az Office lap füles felületet hoz az Office-ba, és sokkal könnyebbé teszi a munkáját

  • Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
  • Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
  • 50% -kal növeli a termelékenységet, és naponta több száz kattintással csökkenti az egér kattintását!
Comments (1)
No ratings yet. Be the first to rate!
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
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations