Ga naar hoofdinhoud

Hoe snel een rij met gegevensvolgorde in Excel omdraaien / omkeren?

Als u de gegevensvolgorde van een rij moet omkeren of omdraaien, hoe kunt u dit dan snel doen? Normaal gesproken moet u hiervoor een VBA-code of andere Excel-invoegtoepassingen gebruiken, omdat Excel een dergelijke bewerking niet ondersteunt. En hier komen de volgende lastige dingen waarmee u snel een rij met gegevensvolgorde in Excel kunt omdraaien of omkeren.

Flip / reverse data order horizontaal in rijen met VBA

Draai / keer de gegevensvolgorde horizontaal in rijen om met Kutools voor Excel



pijl blauw rechts bel Flip / reverse data order horizontaal in rijen met VBA

Hier is een nette VBA-macro waarmee u de gegevensvolgorde in rijen horizontaal snel kunt omdraaien / omkeren.

Stap 1: Houd de toets ingedrukt anders + F11 toetsen in Excel, en het opent het Microsoft Visual Basic voor toepassingen venster.

Stap 2: Klik Invoegen > Moduleen plak de volgende macro in het Modulevenster.

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

Stap 3: Druk de F5 toets om deze macro uit te voeren, en er wordt een dialoogvenster weergegeven waarin u een bereik kunt selecteren om mee te werken, zie screenshot:

doc-omgekeerde volgorde8

Stap 4: Media OK, kunt u het resultaat zien zoals hieronder weergegeven:


pijl blauw rechts bel Draai / keer de gegevensvolgorde horizontaal in rijen om met Kutools voor Excel

met Kutools for Excel's Horizontaal bereik omdraaien tool kunt u de gegevensvolgorde snel horizontaal in geselecteerde rijen spiegelen / omkeren.

Kutools voor Excel bevat meer dan 300 handige Excel-tools. Gratis te proberen zonder beperking binnen 30 dagen. Get it Now.

Stap 1: Selecteer de rij waarin u de gegevens wilt spiegelen.

Stap 2: Klik op de Kutools > Bereikomvormer > Horizontaal bereik omdraaien, zie screenshot:

doc-omgekeerde-rij-volgorde3

Vervolgens ziet u dat alle gegevensvolgorde in de geselecteerde rijen is omgekeerd.

doc-omgekeerde-rij-volgorde4
-1
doc-omgekeerde-rij-volgorde5

Klik Horizontaal bereik omdraaien voor meer informatie over deze functie.


Gerelateerd artikel:

Hoe een kolom met gegevensvolgorde verticaal omdraaien / omkeren in Excel?

Beste Office-productiviteitstools

馃 Kutools AI-assistent: Een revolutie teweegbrengen in de data-analyse op basis van: Intelligente uitvoering   |  Genereer code  |  Aangepaste formules maken  |  Analyseer gegevens en genereer grafieken  |  Roep Kutools-functies aan...
Populaire functies: Zoek, markeer of identificeer duplicaten   |  Verwijder lege rijen   |  Combineer kolommen of cellen zonder gegevens te verliezen   |   Ronde zonder formule ...
Super opzoeken: Meerdere criteria VLookup    VLookup met meerdere waarden  |   VOpzoeken over meerdere bladen   |   Fuzzy opzoeken ....
Geavanceerde vervolgkeuzelijst: Maak snel een vervolgkeuzelijst   |  Afhankelijke vervolgkeuzelijst   |  Multi-select vervolgkeuzelijst ....
Kolom Beheerder: Voeg een specifiek aantal kolommen toe  |  Kolommen verplaatsen  |  Schakel de zichtbaarheidsstatus van verborgen kolommen in  |  Vergelijk bereiken en kolommen ...
Uitgelichte functies: Raster focus   |  Ontwerpweergave   |   Grote formulebalk    Werkmap- en bladbeheer   |  resource Library (Auto-tekst)   |  Datumkiezer   |  Combineer werkbladen   |  Cellen coderen/decoderen    Stuur e-mails per lijst   |  Super filter   |   Speciaal filter (filter vet/cursief/doorhalen...) ...
Top 15 gereedschapsets12 Tekst Tools (toe te voegen tekst, Tekens verwijderen, ...)   |   50+ tabel Types (Gantt Chart, ...)   |   40+ Praktisch Formules (Bereken leeftijd op basis van verjaardag, ...)   |   19 Invoeging Tools (QR-code invoegen, Afbeelding invoegen vanaf pad, ...)   |   12 Camper ombouw Tools (Getallen naar woorden, Currency Conversion, ...)   |   7 Samenvoegen en splitsen Tools (Geavanceerd Combineer rijen, Gespleten cellen, ...)   |   ... en meer

Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar effici毛ntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen.  Klik hier om de functie te krijgen die u het meest nodig heeft...

Omschrijving


Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker

  • Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
  • Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
  • Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!
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