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

Κατεβάστε το βιβλίο ασκήσεων

Μπορείτε να κατεβάσετε το τετράδιο εργασιών και να εξασκηθείτε μαζί τους.

3 αποτελεσματικές μέθοδοι για την αντιστροφή της σειράς των στηλών οριζόντια στο Excel

Ενώ εργάζεται με Microsoft Excel , μπορεί να χρειαστεί να επαναδιατάξουμε ή να αναδιατάξουμε το σύνολο δεδομένων που φτιάξαμε προηγουμένως. Μπορούμε να το κάνουμε αυτό δημιουργώντας ξανά το σύνολο δεδομένων με την απαιτούμενη σειρά. Αλλά αυτή η εργασία είναι χρονοβόρα. Το Excel διαθέτει ορισμένες εκπληκτικές δυνατότητες και εργαλεία, καθώς και ορισμένους ενσωματωμένους τύπους για να κάνετε αυτή τη δουλειά με λίγα μόνο κλικ.

Για παράδειγμα, θα χρησιμοποιήσουμε το ακόλουθο σύνολο δεδομένων που περιέχει ορισμένα ονόματα προϊόντων και την τιμή των προϊόντων. Τώρα, πρέπει να αναδιατάξουμε τις στήλες αντιστρέφοντάς τες και στη συνέχεια τοποθετώντας τες σε οριζόντια σειρά.

1. Εισαγωγή εντολών ταξινόμησης και μετατόπισης για να αντιστρέψετε τη σειρά των στηλών οριζόντια στο Excel

Ταξινόμηση είναι μια φράση που χρησιμοποιείται για να περιγράψει την πράξη της διάταξης των δεδομένων σε μια ορισμένη σειρά για να γίνει απλούστερη η συλλογή δεδομένων. Κατά την ταξινόμηση των δεδομένων σε ένα λογιστικό φύλλο, μπορείτε να αναδιατάξετε τα δεδομένα για να εντοπίσετε γρήγορα τα δεδομένα. Οποιοδήποτε ή και περισσότερα πεδία δεδομένων μπορούν να χρησιμοποιηθούν για την ταξινόμηση μιας περιοχής ή μιας λίστας δεδομένων. Το Excel διαθέτει την εντολή ταξινόμησης για την αναδιάταξη των δεδομένων. Εμείς θα χρησιμοποιήσουμε την εντολή ταξινόμησης για να αντιστρέψουμε τα δεδομένα.

Transpose δημιουργεί μια νέα πηγή δεδομένων, όπου οι γραμμές και οι στήλες του αρχικού εγγράφου δεδομένων αντιστρέφονται. Δημιουργεί άμεσα νέα ονόματα μεταβλητών και παρέχει μια λίστα με τις νέες ετικέτες τιμών. Το Excel έχει τη δυνατότητα λειτουργία transpose με την οποία θα φτιάξουμε τη στήλη σε οριζόντια διάταξη.

Για το σκοπό αυτό, χρειαζόμαστε μια βοηθητική στήλη που θα μας βοηθήσει να καταλάβουμε ότι οι στήλες αντιστρέφονται.

Ας ακολουθήσουμε τις διαδικασίες για να χρησιμοποιήσουμε τη δυνατότητα ταξινόμησης και μεταφοράς στο excel για να αντιστρέψουμε τη σειρά των στηλών οριζόντια.

ΒΗΜΑΤΑ:

• Αρχικά, επιλέξτε τη βοηθητική στήλη για να δείτε τι συμβαίνει μετά τη χρήση της εντολής ταξινόμησης.
• Δεύτερον, πηγαίνετε στο Δεδομένα από την κορδέλα του λογιστικού σας φύλλου.
• Τρίτον, από το Ταξινόμηση & φίλτρο κατηγορία, κάντε κλικ στο εικονίδιο που φαίνεται στο παρακάτω στιγμιότυπο.

• Αυτό θα ανοίξει ένα Ταξινόμηση Προειδοποίηση διάλογος.
• Στη συνέχεια, από το Τι θέλετε να κάνετε; ', επιλέξτε Επεκτείνετε την επιλογή .
• Επιπλέον, κάντε κλικ στο Ταξινόμηση για να τα ταξινομήσετε τέλεια.

• Με αυτόν τον τρόπο, μπορείτε να δείτε ότι οι στήλες είναι τώρα απλά αντίστροφες.

• Δεν χρειαζόμαστε πλέον τη βοηθητική στήλη, οπότε διαγράψτε τη.
• Τώρα, επιλέξτε ολόκληρο το σύνολο δεδομένων και αντιγράψτε τα πατώντας το πλήκτρο Ctrl + C συντόμευση πληκτρολογίου.
• Στη συνέχεια, μεταβείτε στο Αρχική σελίδα της κορδέλας.
• Από το Πρόχειρο κατηγορία, κάντε κλικ στο Επικόλληση αναπτυσσόμενο μενού.
• Και, επιλέξτε Ειδική επικόλληση .

• Εναλλακτικά, μπορείτε να κάνετε δεξί κλικ στο επιλεγμένο κελί όπου θέλετε να τοποθετήσετε τις οριζόντιες στήλες αντίστροφης σειράς και να επιλέξετε Ειδική επικόλληση .
• Αντί να το κάνετε αυτό, μπορείτε απλά να χρησιμοποιήσετε τη συντόμευση πληκτρολογίου Ctrl + Alt + V για να ανοίξετε το Ειδική επικόλληση διάλογος.

• Αυτό θα εμφανίσει το Ειδική επικόλληση παράθυρο διαλόγου.
• Τώρα, τσεκάρετε το Transpose και κάντε κλικ στο OK για να ολοκληρώσετε τη διαδικασία.

• Ή, μπορείτε απλώς να κάνετε κλικ στο εικονίδιο που φαίνεται στο στιγμιότυπο οθόνης για να τοποθετήσετε τις στήλες σε οριζόντια σειρά.

• Και, τελικά, μπορείτε να δείτε την επιθυμητή σειρά. Ακολουθώντας απλώς τα παραπάνω βήματα μπορείτε να αντιστρέψετε τη σειρά της στήλης οριζόντια.

Διαβάστε περισσότερα: Πώς να μεταθέσετε σειρές σε στήλες στο Excel (5 χρήσιμες μέθοδοι)

Παρόμοιες αναγνώσεις

• Πώς να μεταθέσετε σειρές σε στήλες με βάση κριτήρια στο Excel
• Excel Power Query: Μετατόπιση γραμμών σε στήλες (Οδηγός βήμα προς βήμα)
• Πώς να μεταθέσετε σειρές σε στήλες χρησιμοποιώντας το Excel VBA (4 ιδανικά παραδείγματα)
• Μετατόπιση πολλαπλών στηλών σε μία στήλη στο Excel (3 εύχρηστες μέθοδοι)

2. Αντίστροφη σειρά στηλών οριζόντια με τις λειτουργίες του Excel

Μπορούμε να χρησιμοποιήσουμε τις ενσωματωμένες συναρτήσεις του excel για να αναδιατάξουμε το σύνολο δεδομένων με αντίστροφη σειρά των στηλών οριζόντια. Θα δούμε δύο διαφορετικές προσεγγίσεις με τον τύπο.

2.1. Εφαρμογή των λειτουργιών INDEX & TRANSPOSE

Πρώτον, θα χρησιμοποιήσουμε το συνδυασμό INDEX , ΣΕΙΡΕΣ , και ΣΤΗΛΕΣ για να αντιστρέψετε τις στήλες. INDEX δίνει το αποτέλεσμα ή τις αναφορές σε ένα αποτέλεσμα από έναν πίνακα ή ένα εύρος τιμών. ΣΕΙΡΕΣ και το ΣΤΗΛΕΣ είναι συναρτήσεις αναζήτησης/αναφοράς στο Excel. Στη συνέχεια, θα χρησιμοποιήσουμε τη συνάρτηση TRANSPOSE συνάρτηση, ένα κάθετο εύρος κελιών επιστρέφεται ως οριζόντιο εύρος από αυτή τη συνάρτηση. Ας δούμε τις διαδικασίες για τη χρήση των τύπων.

ΒΗΜΑΤΑ:

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

• Στη συνέχεια, πατήστε Εισάγετε το στο πληκτρολόγιο.

• Σύρετε το Χειρολαβή πλήρωσης προς τα κάτω για να αναπαράγετε τον τύπο στην περιοχή. Ή, για να AutoFill την περιοχή, κάντε διπλό κλικ στο Συν ( + ) σύμβολο.

• Επιπλέον, για να επαναλάβετε τον τύπο σε όλο το εύρος, σύρετε το Λαβή πλήρωσης προς τα δεξιά.

• Και, τέλος, θα μπορέσετε να δείτε ότι οι στήλες είναι τώρα αντίστροφα τοποθετημένες.

🔎 Πώς λειτουργεί η φόρμουλα;

• COLUMNS($B$5:B5): Αναζήτηση και επιστροφή του αριθμού στήλης μιας καθορισμένης αναφοράς κελιού.
• ROWS(B5:$B$8): Αναζητά και επιστρέφει τον αριθμό των γραμμών σε κάθε αναφορά ή πίνακα.
• INDEX($B$5:$C$8,ROWS(B5:$B$8),COLUMNS($B$5:B5)): Αυτό θα πάρει ολόκληρο το εύρος των δεδομένων και στη συνέχεια θα αντιστρέψει τις στήλες.

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

• Τύπος Εισάγετε το . και ο τύπος θα εμφανιστεί στη γραμμή τύπων.
• Τέλος, έχετε τη σειρά που προκύπτει.

2.1. Χρήση των λειτουργιών SORTBY & TRANSPOSE

Δεύτερον, θα συνδυάσουμε η λειτουργία SORTBY και το ΣΕΙΡΕΣ για να λάβετε την αντίστροφη σειρά των στηλών. SORTBY συνάρτηση ταξινομεί τα στοιχεία μιας περιοχής ή ενός πίνακα χρησιμοποιώντας έναν τύπο και στοιχεία από μια άλλη περιοχή ή σειρά. Στη συνέχεια, θα χρησιμοποιήσουμε τη συνάρτηση TRANSPOSE για να γίνουν οι στήλες σε οριζόντια σειρά. Ας ακολουθήσουμε τα παρακάτω βήματα.

ΒΗΜΑΤΑ:

• Ομοίως, στις προηγούμενες μεθόδους, αντιγράψτε τις στήλες χωρίς τιμή για να συγκρίνετε τις στήλες.
• Μετά από αυτό, εισαγάγετε εκεί τον ακόλουθο τύπο.

• Περαιτέρω, για να ολοκληρωθεί το χτύπημα της λειτουργίας Εισάγετε το κλειδί.

🔎 Πώς λειτουργεί η φόρμουλα;

• ROW(B5:B8): Αυτό θα ελέγξει και θα λάβει τον αριθμό των γραμμών σε κάθε αναφορά ή πίνακα.
• SORTBY($B$5:$C$8,ROW(B5:B8),-1): Ταξινομήστε την περιοχή αντιστρέφοντάς τα όλα, -1 θα τοποθετήσει το αποτέλεσμα σε ολόκληρη την περιοχή κελιών.

• Μπορείτε τώρα να δείτε ότι οι στήλες είναι τώρα σε αντίστροφη σειρά.
• Επιπλέον, για να κάνετε τα δεδομένα σε οριζόντια σειρά, πληκτρολογήστε τον παρακάτω τύπο.

• Μετά από αυτό, πατήστε Εισάγετε το για να δείτε το αποτέλεσμα.

• Και, αυτό είναι όλο. Μπορείτε να δείτε το επιθυμητό αποτέλεσμα στο φύλλο εργασίας σας.

Διαβάστε περισσότερα: Πώς να μεταθέσετε στήλες σε γραμμές στο Excel (6 μέθοδοι)

3. Εφαρμογή μακροεντολής VBA για την αντιστροφή της σειράς των στηλών οριζόντια στο Excel

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

ΒΗΜΑΤΑ:

• Πρώτον, μεταβείτε στο Προγραμματιστής από την κορδέλα.
• Δεύτερον, από το Κωδικός κατηγορία, κάντε κλικ στο Visual Basic για να ανοίξετε το Visual Basic Editor . ή πατήστε Alt + F11 για να ανοίξετε το Visual Basic Editor .

• Αντί να το κάνετε αυτό, μπορείτε απλά να κάνετε δεξί κλικ στο φύλλο εργασίας σας και να μεταβείτε στην επιλογή Προβολή κωδικού Αυτό θα σας μεταφέρει επίσης στο Visual Basic Editor .

• Αυτό θα εμφανιστεί στο Visual Basic Editor όπου γράφουμε τον κώδικά μας για να δημιουργήσουμε έναν πίνακα από ένα εύρος.
• Στη συνέχεια, αντιγράψτε και επικολλήστε το VBA κώδικα που φαίνεται παρακάτω.

Κωδικός VBA:

 Sub Reverse_Columns_Horizontally() Dim ran As Range Dim ary As Variant Dim int1 As Integer, int2 As Integer, int3 As Integer On Error Resume Next xTitleId = "Reverse Columns" Set ran = Application.Selection Set ran = Application.InputBox("Range", xTitleId, ran.Address, Type:=8) ary = ran.Formula Application.ScreenUpdating = False Application.Calculation =xlCalculationManual For int2 = 1 To UBound(ary, 2) int3 = UBound(ary, 1) For int1 = 1 To UBound(ary, 1) / 2 xTemp = ary(int1, int2) ary(int1, int2) = ary(int3, int2) ary(int3, int2) ary(int3, int2) = xTemp int3 = int3 - 1 Next Next Next ran.Formula = ary Application.ScreenUpdating = TrueApplication.Calculation = xlCalculationAutomatic Range("B10:F11").Value = WorksheetFunction.Transpose(Range("B4:C8")) End Sub 

• Μετά από αυτό, εκτελέστε τον κώδικα κάνοντας κλικ στο κουμπί RubSub ή πατώντας τη συντόμευση πληκτρολογίου F5 .

• Αυτό θα εμφανιστεί σε ένα παράθυρο που φτιάξαμε γράφοντας μερικές γραμμές κώδικα. Το παράθυρο θα ζητήσει τις περιοχές. Επιλέξτε τις περιοχές και στη συνέχεια κάντε κλικ στο κουμπί OK για να ολοκληρώσετε τη διαδικασία.

• Και, μπορείτε να δείτε ότι οι στήλες του συνόλου δεδομένων βρίσκονται τώρα σε αντίστροφη οριζόντια σειρά.

Επεξήγηση κώδικα VBA

 Sub Reverse_Columns_Horizontally() Dim ran As Range Dim ary As Variant Dim int1 As Integer, int2 As Integer, int3 As Integer 

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

 xTitleId = "Reverse Columns" Set ran = Application.Selection Set ran = Application.InputBox("Range", xTitleId, ran.Address, Type:=8) ary = ran.Formula Application.ScreenUpdating = False Application.Calculation = xlCalculationManual 

Αυτές οι γραμμές φτιάχνουν το παράθυρο, το οποίο θα ζητήσει τις περιοχές που θέλουμε να αντιστρέψουμε. Εκεί ορίζουμε το πλαίσιο τίτλου ως Αντίστροφες στήλες και το όνομα του κουτιού ως Εύρος .

 For int2 = 1 To UBound(ary, 2) int3 = UBound(ary, 1) For int1 = 1 To UBound(ary, 1) / 2 xTemp = ary(int1, int2) ary(int1, int2) = ary(int3, int2) ary(int3, int2) = xTemp int3 = int3 - 1 Next Next Next ran.Formula = ary Application.ScreenUpdating = True Application.Calculation =xlCalculationAutomatic 

Αυτό το τμήμα κώδικα αντιστρέφει τις στήλες.

 Range("B10:F11").Value = WorksheetFunction.Transpose(Range("B4:C8")) 

Η γραμμή κώδικα κάνει τις στήλες σε οριζόντια σειρά.

Διαβάστε περισσότερα: VBA για την αντιμετάθεση πολλαπλών στηλών σε γραμμές στο Excel (2 μέθοδοι)

Συμπέρασμα

Οι παραπάνω μέθοδοι θα σας βοηθήσουν να Αντιστροφή της σειράς των στηλών οριζόντια στο Excel Αν έχετε οποιεσδήποτε ερωτήσεις, προτάσεις ή σχόλια, παρακαλούμε ενημερώστε μας στο τμήμα σχολίων. Ή μπορείτε να ρίξετε μια ματιά στα άλλα άρθρα μας στην ενότητα ExcelWIKI.com blog!