Direkt zum Inhalt

Wie kann eine Zeile der Datenreihenfolge in Excel schnell umgedreht / umgekehrt werden?

Wie können Sie die Datenreihenfolge einer Zeile schnell umkehren oder umkehren, wenn Sie sie umkehren oder umkehren müssen? Normalerweise müssen Sie dazu möglicherweise einen VBA-Code oder andere Excel-Add-Ins verwenden, da Excel einen solchen Vorgang nicht unterstützt. Und hier kommen die folgenden kniffligen Dinge, die Ihnen helfen, eine Reihe von Datenreihenfolgen in Excel schnell umzudrehen oder umzukehren.

Datenreihenfolge horizontal in Zeilen mit VBA spiegeln / umkehren

Mit Kutools for Excel Datenreihenfolge horizontal in Zeilen umkehren / umkehren



Pfeil blau rechte Blase Datenreihenfolge horizontal in Zeilen mit VBA spiegeln / umkehren

Mit diesem übersichtlichen VBA-Makro können Sie die Datenreihenfolge in Zeilen horizontal schnell umkehren.

Schritt 1: Halten Sie die Andere + F11 Tasten in Excel, und es öffnet sich die Microsoft Visual Basic für Applikationen Fenster.

Schritt 2: Klicken Sie auf Insert > Modulund fügen Sie das folgende Makro in das Feld ein ModulFenster.

Sub FlipRows()
'Updateby20131126
Dim Rng As Range
Dim WorkRng As Range
Dim Arr As Variant
Dim i As Integer, j As Integer, k As Integer
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Arr = WorkRng.Formula
For i = 1 To UBound(Arr, 1)
    k = UBound(Arr, 2)
    For j = 1 To UBound(Arr, 2) / 2
        xTemp = Arr(i, j)
        Arr(i, j) = Arr(i, k)
        Arr(i, k) = xTemp
        k = k - 1
    Next
Next
WorkRng.Formula = Arr
End Sub

Schritt 3: Drücken Sie die Taste F5 Mit der Taste zum Ausführen dieses Makros wird ein Dialogfeld angezeigt, in dem Sie einen Bereich auswählen können, mit dem gearbeitet werden soll (siehe Abbildung):

doc-umgekehrte-reihenfolge8

Schritt 4: Presse- OKkönnen Sie das Ergebnis wie folgt sehen:


Pfeil blau rechte Blase Mit Kutools for Excel Datenreihenfolge horizontal in Zeilen umkehren / umkehren

Mit der Kutools for Excel Horizontalen Bereich spiegeln Mit diesem Tool können Sie die Datenreihenfolge in ausgewählten Zeilen schnell horizontal umkehren / umkehren.

Kutools for Excel enthält mehr als 300 praktische Excel-Tools. Kostenlos ohne Einschränkung in 30 Tagen zu versuchen. Starten Sie jetzt.

Schritt 1: Wählen Sie die Zeile aus, in der Sie die Daten spiegeln möchten.

Schritt 2: Drücke den Kutoolen > Entfernungsmesser > Horizontalen Bereich spiegeln, siehe Screenshot:

doc-umgekehrte-Reihenreihenfolge3

Dann sehen Sie, dass die gesamte Datenreihenfolge in den ausgewählten Zeilen umgekehrt ist.

doc-umgekehrte-Reihenreihenfolge4
-1
doc-umgekehrte-Reihenreihenfolge5

Klicken Sie auf Kostenlos erhalten und dann auf Installieren. Horizontalen Bereich spiegeln um mehr über diese Funktion zu erfahren.


In Verbindung stehender Artikel:

Wie kann eine Spalte der Datenreihenfolge in Excel vertikal gespiegelt / umgekehrt werden?

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 Toolsets12 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 (7)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
In response to Rodrigo, Fbkil:

The error occurs because when you cut and paste the macro text into the Excel VBA editor, there are non-printing characters hidden in the area where the macro rows are indented. Delete them and it will work.

Note: Solved by someone else, not me. Was tricky, as it looked like it should work, but didn't.
This comment was minimized by the moderator on the site
When I try to run this macro, I get the message "syntax error" with the command line "For j = 1 To UBound(Arr, 2) / 2" highlighted in red. Does anyone know how to fix it?
This comment was minimized by the moderator on the site
got the same error. update needed
This comment was minimized by the moderator on the site
Great tool, thanks so much for VBA - I transposed a column to rows first and then used your VBA for reversing - saved tons of time!
This comment was minimized by the moderator on the site
You flipped the column order not the row order as per the title.
This comment was minimized by the moderator on the site
Copy paste (transpose) the row to column. Add 1 to x on the column beside. Filter from largest to smallest and expand. Then copy paste result and transpose to row again
This comment was minimized by the moderator on the site
A quicker way would be be to copy your selection. Right click, choose paste special. Check the transpose button, hit ok and the rows and columns will be transposed. http://office.microsoft.com/en-us/excel-help/switch-transpose-columns-and-rows-HP010224502.aspx
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations