Note: The other languages of the website are Google-translated. Back to English

Hoe rijen of kolommen in omgekeerde volgorde in Excel te kopiëren en te plakken?

Soms moet u een lijst met kolommen of rijen in omgekeerde volgorde verticaal of horizontaal kopiëren en plakken, zoals onderstaand screenshot. Hoe kun je deze klus snel en gemakkelijk in Excel afhandelen?

Kopieer en plak een lijst met kolommen of rijen in omgekeerde volgorde met formule

Kopieer en plak een reeks kolommen of rijen in omgekeerde volgorde met VBA-code

Kopieer en plak een reeks kolommen of rijen in omgekeerde volgorde met een geweldige functie


Kopieer en plak een lijst met kolommen of rijen in omgekeerde volgorde met formule

Kopieer en plak een lijst met kolommen verticaal in omgekeerde volgorde

Als u een lijst met kolomcellen wilt omkeren, kunt u de onderstaande formule toepassen:

Typ of kopieer de volgende formule naar een lege cel waarin u de kolomvolgorde wilt omkeren:

=OFFSET($A$15,-(ROW(A1)-1),0)

Opmerking:: In de bovenstaande formule, A1 is de eerste cel in de kolom, en A15 is de laatste cel in de kolom.

Sleep vervolgens de vulgreep naar de cellen om de celwaarden in omgekeerde volgorde te extraheren, zoals onderstaand screenshot:


Kopieer en plak een lijst met rijen in omgekeerde volgorde horizontaal

Gebruik de volgende formule om een ​​lijst met rijen in omgekeerde volgorde te kopiëren en te plakken:

Typ of kopieer deze formule naar een lege cel:

=OFFSET($A$1,,COUNTA(1:1)-COLUMN(A1),)

Opmerking:: In de bovenstaande formule, A1 is de eerste cel in de rij, en 1:1 is het rijnummer dat uw gegevens hebben gevonden. Als uw gegevens in rij 10 staan, moet u deze wijzigen in 10:10.

En sleep vervolgens de vulgreep naar de cellen waarop u deze formule wilt toepassen totdat alle waarden zijn geëxtraheerd, en u krijgt alle waarden horizontaal omgekeerd, zie screenshot:


Kopieer en plak een reeks kolommen of rijen in omgekeerde volgorde met VBA-code

Als u een reeks kolommen of rijen in omgekeerde volgorde moet kopiëren en plakken, zal ik hier enkele VBA-codes introduceren om het snel en gemakkelijk op te lossen. Voer de volgende stappen uit:

Kopieer en plak een lijst met kolommen verticaal in omgekeerde volgorde

1. Eerst moet u uw gegevens kopiëren en op een nieuwe plaats plakken en vervolgens de ALT + F11 toetsen om de te openen Microsoft Visual Basic voor toepassingen venster.

2. Klikken Invoegen > Moduleen plak de volgende code in het Module Venster.

VBA-code: kopieer en plak een reeks cellen verticaal in omgekeerde volgorde

Sub Flipvertically()
'updateby Extendoffice
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 j = 1 To UBound(Arr, 2)
    k = UBound(Arr, 1)
    For i = 1 To UBound(Arr, 1) / 2
        xTemp = Arr(i, j)
        Arr(i, j) = Arr(k, j)
        Arr(k, j) = xTemp
        k = k - 1
    Next
Next
WorkRng.Formula = Arr
End Sub

3. Druk vervolgens op F5 toets om deze code uit te voeren, en er verschijnt een promptvenster om u eraan te herinneren het gegevensbereik te selecteren dat u verticaal wilt omkeren, zie screenshot:

4. En klik dan OK knop, en het gegevensbereik is verticaal omgekeerd zoals hieronder weergegeven screenshots:


Kopieer en plak een reeks cellen horizontaal in omgekeerde volgorde

Pas de onderstaande VBA-code toe om het gegevensbereik in horizontale volgorde om te keren:

VBA-code: kopieer en plak een reeks cellen horizontaal in omgekeerde volgorde

Sub Fliphorizontally()
'updateby Extendoffice
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

Nadat je deze code hebt uitgevoerd, krijg je de volgende schermafbeeldingen die je nodig hebt:


Kopieer en plak een reeks kolommen of rijen in omgekeerde volgorde met een geweldige functie

Als u niet bekend bent met de bovenstaande formules en VBA-codes, zal ik hier een eenvoudige tool aanbevelen-Kutools for Excel, Met Verticaal bereik omdraaien en Horizontaal bereik omdraaien functies, kunt u het celbereik verticaal en horizontaal omkeren met slechts één klik.

Tips:Om dit toe te passen Verticaal bereik omdraaien en Horizontaal bereik omdraaien functies, ten eerste moet u het Kutools for Excelen pas de functie vervolgens snel en gemakkelijk toe.

Na het installeren van Kutools for Excel, doe dit als volgt:

Kopieer en plak een reeks cellen horizontaal in omgekeerde volgorde

1. Selecteer het celbereik en klik op Kutools > Bereik > Verticaal bereik omdraaien > Alles (alleen waarden omdraaien), zie screenshot:

2. En dan is het bereik van celwaarden in één keer verticaal omgekeerd, zie screenshots:


Kopieer en plak een reeks cellen horizontaal in omgekeerde volgorde

1. Selecteer het celbereik en klik op Kutools > Bereik > Horizontaal bereik omdraaien > Alles (alleen waarden omdraaien), zie screenshot:

2. En dan zijn alle celwaarden in de selectie onmiddellijk horizontaal omgekeerd, zie screenshots:

Klik om Kutools voor Excel en nu gratis uit te proberen!


Meer relatieve kopieer- en plakartikelen:

  • Kopieer en plak samengevoegde cellen naar enkele cellen in Excel
  • Normaal gesproken worden de samengevoegde cellen direct geplakt als u de samengevoegde cellen kopieert en in andere cellen plakt. Maar u wilt deze samengevoegde cellen in afzonderlijke cellen plakken zoals in de volgende schermafbeelding wordt getoond, zodat u met de gegevens kunt omgaan zoals u nodig hebt. In dit artikel zal ik het hebben over het kopiëren en plakken van samengevoegde cellen naar afzonderlijke cellen.
  • Kopieer een kolom en plak alleen de unieke records in Excel
  • Voor een kolom met veel duplicaten heeft u mogelijk een kopie van deze lijst nodig met alleen de unieke waarden. Hoe kunt u dit bereiken? In dit artikel bieden we twee methoden om alleen de unieke records uit een kolomlijst in Excel te plakken.
  • Kopieer gegevens van beveiligd blad
  • Stel dat u een Excel-bestand ontvangt van een andere persoon die met werkbladen wordt beschermd door de gebruiker, nu wilt u de onbewerkte gegevens kopiëren en in een andere nieuwe werkmap plakken. Maar de gegevens in het beveiligde blad kunnen niet worden geselecteerd en gekopieerd omdat de gebruiker de opties Selecteer vergrendelde cellen en Selecteer ontgrendelde cellen bij het beschermen van het werkblad uitschakelt.
  • Kopieer gegevens naar een ander werkblad met geavanceerd filter in Excel
  • Normaal gesproken kunnen we snel de functie Geavanceerd filter toepassen om gegevens uit de onbewerkte gegevens in hetzelfde werkblad te extraheren. Maar soms, wanneer u probeert het gefilterde resultaat naar een ander werkblad te kopiëren, krijgt u het volgende waarschuwingsbericht. Hoe zou u in dit geval deze taak in Excel kunnen uitvoeren?

  • Super Formula-balk (bewerk eenvoudig meerdere regels tekst en formule); Lay-out lezen (gemakkelijk grote aantallen cellen lezen en bewerken); Plakken in gefilterd bereik...
  • Voeg cellen / rijen / kolommen samen en het bewaren van gegevens; Gespleten cellen inhoud; Combineer dubbele rijen en som / gemiddelde... Voorkom dubbele cellen; Vergelijk Ranges...
  • Selecteer Dupliceren of Uniek Rijen; Selecteer lege rijen (alle cellen zijn leeg); Super zoeken en fuzzy zoeken in veel werkboeken; Willekeurige selectie ...
  • Exacte kopie Meerdere cellen zonder de formuleverwijzing te wijzigen; Maak automatisch verwijzingen naar meerdere bladen; Plaats kogels, Selectievakjes en meer ...
  • Favoriete formules en snel invoegen, Bereiken, grafieken en afbeeldingen; Versleutel cellen met wachtwoord; Maak een mailinglijst en stuur e-mails ...
  • Extraheer tekst, Tekst toevoegen, Verwijderen op positie, Ruimte verwijderen; Paging-subtotalen maken en afdrukken; Converteren tussen celinhoud en opmerkingen...
  • Super filter (bewaar en pas filterschema's toe op andere bladen); Geavanceerd sorteren per maand / week / dag, frequentie en meer; Speciaal filter door vet, cursief ...
  • Combineer werkmappen en werkbladen; Tabellen samenvoegen op basis van sleutelkolommen; Gegevens splitsen in meerdere bladen; Batch Converteer xls, xlsx en PDF...
  • Draaitabel groeperen op weeknummer, dag van de week en meer ... Toon ontgrendelde, vergrendelde cellen door verschillende kleuren; Markeer cellen met formule / naam...
kte tabblad 201905
  • 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!
officetab onderkant
Heb je vragen? Stel ze hier. (3)
Rated 5 uit 5 · 1 ratings
Deze opmerking is gemaakt door de moderator op de site
Ik heb de optie van de VBA-code gebruikt. Veel dank!!!
Deze opmerking is gemaakt door de moderator op de site
OFFSET($A$15,-(ROW(A1)-1),0) en OFFSET($A$1,,COUNTA(1:1)-COLUMN(A1),) werken niet wanneer de gegevens zich niet in de eerste rij of kolom.
deze functies lijken beter te werken:

Spiegel rij:
stel dat de gegevens zich in G11:K11 . bevinden
OFFSET($G$11,,COUNTA(11:11)-COUNTA($G$11:G11),) ........ OFFSET($G$11,,COUNTA(11:11)-COUNTA($G$11:K11),)

Spiegelkolom:
stel dat de gegevens zich in E22:E26 . bevinden
OFFSET($E$22,ROW($E$26)-ROW(E22),0) ........ OFFSET($E$22,ROW($E$26)-ROW(E26),0)
Rated 5 uit 5
Deze opmerking is gemaakt door de moderator op de site
Hallo Nasrin,

Hoe is het met je. Ik heb je formules geprobeerd en ze werken perfect. Bedankt voor je aandeel. We zullen uw advies opvolgen. Fijne dag.

Hoogachtend,
Mandy
Er zijn nog geen reacties geplaatst
Laat uw commentaar
Posten als gast
×
Beoordeel dit bericht:
0   Personages
Voorgestelde locaties

Volg ons

Copyright © 2009 - www.extendoffice.com. | Alle rechten voorbehouden. Aangedreven door ExtendOffice. | Sitemap
Microsoft en het Office-logo zijn handelsmerken of gedeponeerde handelsmerken van Microsoft Corporation in de Verenigde Staten en / of andere landen.
Beschermd door Sectigo SSL