Hoe kopieer en plak je rijen of kolommen in omgekeerde volgorde in Excel?

Soms moet je mogelijk een lijst van kolommen of rijen in omgekeerde volgorde kopiëren en plakken, zowel verticaal als horizontaal, zoals in onderstaande schermafbeelding te zien is. Hoe kun je deze taak snel en eenvoudig afhandelen in Excel?

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

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

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

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

Kopieer en plak een lijst van kolommen in omgekeerde volgorde, verticaal

Als je een lijst van kolomcellen wilt omkeren, kun je de volgende formule toepassen:

Voer of kopieer de volgende formule in een lege cel in waar je de kolomvolgorde wilt omkeren:

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

Sleep vervolgens de vulgreep naar beneden naar de cellen om de celwaarden in omgekeerde volgorde te extraheren, zoals in onderstaande schermafbeelding te zien is:

Kopieer en plak een lijst van rijen in omgekeerde volgorde, horizontaal

Om een lijst van rijen in omgekeerde volgorde te kopiëren en plakken, gebruik dan de volgende formule:

Voer of kopieer deze formule in een lege cel in:

Opmerking: In bovenstaande formule is A1 de eerste cel in de rij en 1:1 het rijnummer waar je gegevens zich bevinden. Als je gegevens zich in rij 10 bevinden, moet je dit wijzigen naar 10:10.

Sleep vervolgens de vulgreep naar rechts naar de cellen waar je deze formule wilt toepassen totdat alle waarden zijn geëxtraheerd, en je krijgt alle waarden horizontaal omgekeerd, zie onderstaande schermafbeelding:

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

Als je een bereik van kolommen of rijen in omgekeerde volgorde moet kopiëren en plakken, introduceer ik hier enkele VBA-codes om dit snel en gemakkelijk op te lossen. Volg de volgende stappen:

Kopieer en plak een lijst van kolommen in omgekeerde volgorde, verticaal

1. Kopieer eerst je gegevens naar een nieuwe locatie, en druk vervolgens op de toetsen ALT + F11 om het venster Microsoft Visual Basic for Applications te openen.

2. Klik op Invoegen > Module, en plak de volgende code in het Module-venster.

VBA-code: Kopieer en plak een bereik van cellen in omgekeerde volgorde, verticaal

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 de F5-toets om deze code uit te voeren, en er verschijnt een pop-upvenster dat je eraan herinnert om het gegevensbereik te selecteren dat je verticaal wilt omkeren, zie onderstaande schermafbeelding:

4. Klik vervolgens op de knop OK, en het gegevensbereik is verticaal omgekeerd, zoals in onderstaande schermafbeeldingen te zien is:

Kopieer en plak een bereik van cellen in omgekeerde volgorde, horizontaal

Om het gegevensbereik in horizontale volgorde om te keren, pas dan de volgende VBA-code toe:

VBA-code: Kopieer en plak een bereik van cellen in omgekeerde volgorde, horizontaal

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

Na het uitvoeren van deze code krijg je de volgende schermafbeeldingen zoals je nodig hebt:

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

Als je niet bekend bent met de bovenstaande formules en VBA-codes, raad ik hier een eenvoudig hulpmiddel aan - Kutools voor Excel. Met de functies Keer reeks verticaal om en Keer reeks horizontaal om kun je het bereik van cellen verticaal en horizontaal met één klik omkeren.

Nadat je Kutools voor Excel hebt geïnstalleerd, doe dan het volgende:

Kopieer en plak een bereik van cellen in omgekeerde volgorde, horizontaal

1. Selecteer het bereik van cellen, en klik vervolgens op Kutools > Bereik > Keer verticale reeks om > Alles (Alleen inhoud omkeren), zie onderstaande schermafbeelding:

2. En vervolgens worden de waarden van het bereik van cellen onmiddellijk verticaal omgekeerd, zie onderstaande schermafbeeldingen:

Kopieer en plak een bereik van cellen in omgekeerde volgorde, horizontaal

1. Selecteer het bereik van cellen, en klik vervolgens op Kutools > Bereik > Keer horizontale reeks om > Alles (Alleen inhoud omkeren), zie onderstaande schermafbeelding:

2. En vervolgens zijn alle celwaarden in de selectie onmiddellijk horizontaal omgekeerd, zie onderstaande schermafbeeldingen:

Klik hier om Kutools voor Excel nu te downloaden en gratis te proberen!

Meer gerelateerde artikelen over kopiëren en plakken:

---

De Beste Office Productiviteitstools

Kutools voor Excel lost de meeste van uw problemen op en verhoogt uw productiviteit met 80%

• Super Formulebalk (bewerk eenvoudig meerdere regels tekst en formules); Leeslayout (lees en bewerk eenvoudig grote aantallen cellen); Plakken in gefilterd bereik...
• Cellen/Rijen/Kolommen samenvoegen en gegevens behouden; Celinhoud splitsen; Dubbele rijen combineren en optellen/gemiddelde berekenen... Voorkom dubbele cellen; Bereiken vergelijken...
• Selecteer dubbele of unieke rijen; Selecteer lege rijen (alle cellen zijn leeg); Super Zoeken en Fuzzy Zoeken in veel werkboeken; Willekeurige selectie...
• Exacte kopie van meerdere cellen zonder formuleverwijzing te wijzigen; Automatisch verwijzingen naar meerdere werkbladen maken; Opsommingstekens, selectievakjes en meer invoegen...
• Favoriete en snel formules, bereiken, grafieken en afbeeldingen invoegen; Cellen versleutelen met wachtwoord; Mailinglijst maken en e-mails versturen...
• Tekst extraheren, Tekst toevoegen, Verwijder tekens op een specifieke positie, Spaties verwijderen; Maak en print statistieken per pagina; Converteer tussen celinhoud en opmerkingen...
• Superfilter (filter schema's opslaan en toepassen op andere werkbladen); Geavanceerd sorteren op maand/week/dag, frequentie en meer; Speciaal filteren op vet, cursief...
• Werkboeken en werkbladen combineren; Tabellen samenvoegen op basis van sleutelkolommen; Gegevens splitsen in meerdere werkbladen; Batchconversie xls, xlsx en PDF...
• Draaitabelgroepering op weeknummer, dag van de week en meer... Toon ontgrendelde, vergrendelde cellen met verschillende kleuren; Markeer cellen die een formule/naam bevatten...

Lees meer... Volledige functies 30-daagse gratis proefversie... Aanschaffen... 

---

Office Tab - brengt een tabbladinterface naar Office en maakt uw werk veel gemakkelijker

• Schakel tabbladbewerking en -lezen in Word, Excel, PowerPoint, Publisher, Access, Visio en Project in.
• 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!

Lees meer... Volledige functies 30-daagse gratis proefversie... Aanschaffen...