Μετάβαση στο κύριο περιεχόμενο

Πώς να αντιστρέψετε έναν συγκεντρωτικό πίνακα στο Excel;

doc-reverse-pivottable-1
Θέλατε ποτέ να αντιστρέψετε ή να μεταφέρετε τον περιστρεφόμενο πίνακα στο Excel, όπως φαίνεται στα παρακάτω στιγμιότυπα οθόνης. Τώρα θα σας πω τους γρήγορους τρόπους αντιστροφής ενός περιστρεφόμενου πίνακα στο Excel.
(11 βήματα) Πίσω πίνακας περιστροφής με PivotTable και PivotChart Wizard
(7 βήματα) Αντιστρέψτε τον περιστρεφόμενο πίνακα με το Kutools για τις διαστάσεις πίνακα μεταφοράς του Excel καλή ιδέα3

βέλος μπλε δεξιά φούσκα Αντιστρέψτε τον περιστρεφόμενο πίνακα με PivotTable και PivotChart Wizard

Για να αντιστρέψετε τον συγκεντρωτικό πίνακα, πρέπει πρώτα να ανοίξετε το παράθυρο διαλόγου Συγκεντρωτικός πίνακας και οδηγός Συγκεντρωτικού χάρτη και να δημιουργήσετε έναν νέο συγκεντρωτικό πίνακα στο Excel.

1. Τύπος Alt + D + P πλήκτρα συντόμευσης για να ανοίξετε το παράθυρο διαλόγου Συγκεντρωτικός πίνακας και οδηγός Συγκεντρωτικού χάρτη, στη συνέχεια, επιλέξτε Πολλαπλά εύρη ενοποίησης κάτω από την επιλογή Πού είναι τα δεδομένα που θέλετε να αναλύσετε τμήμα και Συγκεντρωτικός πίνακας κάτω από την επιλογή Τι είδους αναφορά θέλετε να δημιουργήσετε τμήμα.

Note: Μπορείτε επίσης να προσθέσετε την εντολή PivotTabe και PivoChart Wizard στη γραμμή εργαλείων γρήγορης πρόσβασης και να κάνετε κλικ για να ανοίξετε το παράθυρο διαλόγου.

doc-reverse-pivottable-2

2. κλικ Επόμενο για να μεταβείτε στον επόμενο διάλογο για έλεγχο Θα δημιουργήσω τα πεδία της σελίδας και κάντε κλικ στο Επόμενο.

doc-reverse-pivottable-3

3. Επιλέξτε τα βασικά σας δεδομένα και, στη συνέχεια, κάντε κλικ στο Πρόσθεση για να προσθέσετε το εύρος δεδομένων στο Όλα τα εύρη λίστα. Δείτε το στιγμιότυπο οθόνης:

doc-reverse-pivottable-4

4. κλικ Επόμενο για να μεταβείτε στο τελευταίο βήμα του οδηγού, ελέγξτε την επιλογή που χρειάζεστε Πού θέλετε να βάλετε την αναφορά Συγκεντρωτικού Πίνακα Ενότητα. Στη συνέχεια κάντε κλικ στο κουμπί φινίρισμα.

doc-reverse-pivottable-5

5. Τώρα δημιουργείται ένας νέος συγκεντρωτικός πίνακας και κάντε διπλό κλικ στο τελευταίο κελί στη δεξιά κάτω γωνία του νέου Pivot table και μετά δημιουργείται ένας νέος πίνακας σε ένα νέο φύλλο εργασίας. Δείτε στιγμιότυπα οθόνης:
doc-reverse-pivottable-6

iv>

6. Στη συνέχεια, δημιουργήστε έναν νέο συγκεντρωτικό πίνακα βάσει αυτού του νέου πίνακα. Επιλέξτε ολόκληρο τον νέο πίνακα και κάντε κλικ στο Κύριο θέμα > Συγκεντρωτικός πίνακας > Συγκεντρωτικός πίνακας.

doc-reverse-pivottable-7

7. Στη συνέχεια, στο αναδυόμενο παράθυρο διαλόγου, επιλέξτε την επιλογή που χρειάζεστε Επιλέξτε πού θέλετε να τοποθετηθεί η αναφορά Συγκεντρωτικού Πίνακα τμήμα.

doc-reverse-pivottable-8

8. κλικ OK. Μετά ένα Λίστα πεδίων συγκεντρωτικού πίνακα εμφανίζεται το παράθυρο και σύρετε το Σειρά και Στήλη πεδία προς το Ετικέτες σειράς ενότητα και το πεδίο Value to Αξίες Ενότητα. Δείτε το στιγμιότυπο οθόνης:

doc-reverse-pivottable-9

9. Στη συνέχεια, κάντε κλικ σε οποιοδήποτε κελί του νέου συγκεντρωτικού πίνακα και μεταβείτε στο Υπηρεσίες Κάντε κλικ στην επιλογή Διάταξη αναφοράς> Εμφάνιση σε μορφή πίνακα.

doc-reverse-pivottable-10

10. Στη συνέχεια, πηγαίνετε στο κλικ Διάταξη αναφοράς ξανά για να κάνετε κλικ Επαναλάβετε όλες τις ετικέτες στοιχείων από τη λίστα. Δείτε το στιγμιότυπο οθόνης:

doc-reverse-pivottable-11

Note: Αυτό δεν είναι Επαναλάβετε όλες τις ετικέτες στοιχείων εντολή στην αναπτυσσόμενη λίστα του Διάταξη αναφοράς κουμπί στο Excel 2007, απλώς παραλείψτε αυτό το βήμα.

11. κλικ Υπηρεσίες > Υποσύνολα > Να μην εμφανίζονται υποσύνολα.

doc-reverse-pivottable-12

Τώρα ο συγκεντρωτικός πίνακας αντιστρέφεται. Δείτε το στιγμιότυπο οθόνης:

doc-reverse-pivottable-13

βέλος μπλε δεξιά φούσκα Αντιστρέψτε τον περιστρεφόμενο πίνακα με το Kutools για το Excel Transpose Table Dimensions

Με τον παραπάνω τρόπο, υπάρχουν τόσα πολλά βήματα για την επίλυση της εργασίας. Για να βελτιώσετε σημαντικά την αποδοτικότητα της εργασίας σας και να μειώσετε τις ώρες εργασίας, σας προτείνω να αντιστρέψετε τον περιστρεφόμενο πίνακα με Kutools για Excel'S Μεταφορά διαστάσεων πίνακα χαρακτηριστικό.

1. Επιλέξτε τα βασικά δεδομένα και κάντε κλικ στο Kutools > Σειρά > Μεταφορά διαστάσεων πίνακα.

doc αναστρέψιμο περιστρεφόμενο 20

2. Στο Μεταφορά διαστάσεων πίνακα διάλογος, ελέγξτε Σταυρός πίνακας για λίστα υπό Μεταφορά τύπου ενότητα και, στη συνέχεια, επιλέξτε το κελί που θέλετε να τοποθετήσετε τον νέο πίνακα.

excel πρόσθετο εργαλείο για αλλαγή πίνακα 2d σε 1d

3. κλικ Ok για να δημιουργήσετε έναν νέο πίνακα και, στη συνέχεια, εισαγάγετε κεφαλίδες πάνω από τον νέο πίνακα. Δείτε το στιγμιότυπο οθόνης:

doc-reverse-pivottable-16

4. Επιλέξτε το νέο πίνακα, συμπεριλαμβανομένων των κεφαλίδων, και κάντε κλικ στο Κύριο θέμα > Συγκεντρωτικός πίνακας > Συγκεντρωτικός πίνακας, στη συνέχεια στο Δημιουργία Συγκεντρωτικού Πίνακα διαλόγου, ελέγξτε την επιλογή που χρειάζεστε Επιλέξτε πού θέλετε να τοποθετηθεί η αναφορά Συγκεντρωτικού Πίνακα τμήμα.

doc-reverse-pivottable-17

5. κλικ OK, και στο Λίστα πεδίων συγκεντρωτικού πίνακα παράθυρο, σύρετε Σειρά και Στήλη πεδία προς Ετικέτες σειράς ενότητα, και αξία πεδίο στο Αξίες τμήμα.
doc-reverse-pivottable-9

6. Κάντε κλικ σε οποιοδήποτε κελί του νέου συγκεντρωτικού πίνακα και κάντε κλικ Υπηρεσίες > Διάταξη αναφοράς > Εμφάνιση σε μορφή πίνακα, στη συνέχεια κάντε κλικ στο κουμπί Διάταξη αναφοράς ξανά για να κάνετε κλικ Επαναλάβετε όλες τις ετικέτες στοιχείων. Δείτε στιγμιότυπα οθόνης:

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

Note: Αυτό δεν είναι Επαναλάβετε όλες τις ετικέτες στοιχείων εντολή στην αναπτυσσόμενη λίστα του κουμπιού διάταξης αναφοράς στο Excel 2007, απλώς παραλείψτε την.

7. κλικ Υπηρεσίες > Υποσύνολα > Να μην εμφανίζονται υποσύνολα.

doc-reverse-pivottable-12

Τώρα ο συγκεντρωτικός πίνακας αντιστρέφεται. Δείτε το στιγμιότυπο οθόνης:

doc-reverse-pivottable-19

Με Kutools για Excel'S Μεταφορά διαστάσεων πίνακα δυνατότητα, μπορείτε επίσης να μετατρέψετε τον πίνακα λίστας σε cross table. Κάντε κλικ εδώ για να μάθετε περισσότερες πληροφορίες.

Μεταφέρετε γρήγορα το Cross table στη λίστα ή το αντίστροφο
Ενώ λαμβάνετε ένα φύλλο με εγκάρσιο τραπέζι που πρέπει να μετατρέψετε σε πίνακα λίστας, πώς μπορείτε να το αντιμετωπίσετε γρήγορα; Με Kutools από το Excel's Μεταφορά διαστάσεων πίνακα βοηθητικό πρόγραμμα, μπορείτε να μετατρέψετε τον πίνακα διαστάσεων σε πίνακα τριών διαστάσεων ή το αντίστροφο όσο πιο γρήγορα μπορείτε.   Κάντε κλικ για δωρεάν δοκιμή 30 ημερών με πλήρεις δυνατότητες!
έγγραφο μεταφορά σταυρός στη λίστα
 
Kutools για Excel: με περισσότερα από 300 εύχρηστα πρόσθετα Excel, δωρεάν δοκιμή χωρίς περιορισμό σε 30 ημέρες.

Σχετικά άρθρα:

Τα καλύτερα εργαλεία παραγωγικότητας γραφείου

🤖 Kutools AI Aide: Επανάσταση στην ανάλυση δεδομένων με βάση: Ευφυής Εκτέλεση   |  Δημιουργία κώδικα  |  Δημιουργία προσαρμοσμένων τύπων  |  Αναλύστε δεδομένα και δημιουργήστε γραφήματα  |  Επίκληση Λειτουργιών Kutools...
Δημοφιλή χαρακτηριστικά: Εύρεση, επισήμανση ή αναγνώριση διπλότυπων   |  Διαγραφή κενών γραμμών   |  Συνδυάστε στήλες ή κελιά χωρίς απώλεια δεδομένων   |   Γύρος χωρίς φόρμουλα ...
Σούπερ Αναζήτηση: VLookup πολλαπλών κριτηρίων  |   VLookup πολλαπλών τιμών  |   VLookup σε πολλά φύλλα   |   Ασαφής αναζήτηση ....
Σύνθετη αναπτυσσόμενη λίστα: Γρήγορη δημιουργία αναπτυσσόμενης λίστας   |  Εξαρτημένη αναπτυσσόμενη λίστα   |  Πολλαπλή αναπτυσσόμενη λίστα ....
Διαχειριστής στήλης: Προσθέστε έναν συγκεκριμένο αριθμό στηλών  |  Μετακίνηση στηλών  |  Εναλλαγή κατάστασης ορατότητας κρυφών στηλών  |  Συγκρίνετε εύρη και στήλες ...
Επιλεγμένα Χαρακτηριστικά: Εστίαση πλέγματος   |  Προβολή σχεδίου   |   Μεγάλη Formula Bar   |  Διαχείριση βιβλίου εργασίας & φύλλου   |  Βιβλιοθήκη πόρων (Αυτόματο κείμενο)   |  Επιλογή ημερομηνίας   |  Συνδυάστε φύλλα εργασίας   |  Κρυπτογράφηση/Αποκρυπτογράφηση κελιών   |  Αποστολή email ανά λίστα   |  Σούπερ φίλτρο   |   Ειδικό φίλτρο (φίλτρο με έντονη γραφή/πλάγια γραφή/διαγραφή...) ...
Κορυφαία 15 σύνολα εργαλείων:  12 Κείμενο Εργαλεία (Προσθήκη κειμένου, Κατάργηση χαρακτήρων, ...)   |   50 + Διάγραμμα Τύποι (Gantt διάγραμμα, ...)   |   40+ Πρακτικό ΜΑΘΗΜΑΤΙΚΟΙ τυποι (Υπολογίστε την ηλικία με βάση τα γενέθλια, ...)   |   19 Εισαγωγή Εργαλεία (Εισαγωγή κωδικού QR, Εισαγωγή εικόνας από το μονοπάτι, ...)   |   12 Μετατροπή Εργαλεία (Αριθμοί σε λέξεις, Μετατροπή Συναλλάγματος, ...)   |   7 Συγχώνευση & διαχωρισμός Εργαλεία (Σύνθετες σειρές συνδυασμού, Διαίρεση κελιών, ...)   |   ... κι αλλα

Αυξήστε τις δεξιότητές σας στο Excel με τα Kutools για Excel και απολαύστε την αποτελεσματικότητα όπως ποτέ πριν. Το Kutools για Excel προσφέρει πάνω από 300 προηγμένες δυνατότητες για την ενίσχυση της παραγωγικότητας και την εξοικονόμηση χρόνου.  Κάντε κλικ εδώ για να αποκτήσετε τη δυνατότητα που χρειάζεστε περισσότερο...

Περιγραφή

Το Office Tab φέρνει τη διεπαφή με καρτέλες στο Office και κάνει την εργασία σας πολύ πιο εύκολη

  • Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
  • Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
  • Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!
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