Przejdź do głównej zawartości

Jak skopiować i wkleić wiersze lub kolumny w odwrotnej kolejności w programie Excel?

Czasami może być konieczne skopiowanie i wklejenie listy kolumn lub wierszy w odwrotnej kolejności w pionie lub poziomie, jak pokazano na zrzucie ekranu. Jak możesz szybko i łatwo poradzić sobie z tą pracą w programie Excel?

Skopiuj i wklej listę kolumn lub wierszy w odwrotnej kolejności z formułą

Skopiuj i wklej zakres kolumn lub wierszy w odwrotnej kolejności z kodem VBA

Skopiuj i wklej szereg kolumn lub wierszy w odwrotnej kolejności dzięki niesamowitej funkcji


Skopiuj i wklej listę kolumn lub wierszy w odwrotnej kolejności z formułą

Skopiuj i wklej listę kolumn w odwrotnej kolejności w pionie

Jeśli chcesz odwrócić listę komórek kolumn, możesz zastosować poniższą formułę:

Wprowadź lub skopiuj następującą formułę do pustej komórki, w której chcesz odwrócić kolejność kolumn:

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

Note: W powyższym wzorze, A1 to pierwsza komórka w kolumnie, a A15 to ostatnia komórka w kolumnie.

Następnie przeciągnij uchwyt wypełniania w dół do komórek, aby wyodrębnić wartości komórek w odwrotnej kolejności, jak pokazano na poniższym zrzucie ekranu:


Skopiuj i wklej listę wierszy w odwrotnej kolejności w poziomie

Aby skopiować i wkleić listę wierszy w odwrotnej kolejności, użyj następującego wzoru:

Wprowadź lub skopiuj tę formułę do pustej komórki:

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

Note: W powyższym wzorze, A1 to pierwsza komórka w rzędzie, a 1:1 to numer wiersza, w którym znajdują się Twoje dane. Jeśli twoje dane w wierszu 10, powinieneś zmienić je na 10:10.

A następnie przeciągnij uchwyt wypełniania w prawo do komórek, do których chcesz zastosować tę formułę, aż wszystkie wartości zostaną wyodrębnione, a wszystkie wartości zostaną odwrócone w poziomie, patrz zrzut ekranu:


Skopiuj i wklej zakres kolumn lub wierszy w odwrotnej kolejności z kodem VBA

Jeśli chcesz skopiować i wkleić zakres kolumn lub wierszy w odwrotnej kolejności, tutaj przedstawię kilka kodów VBA, aby szybko i łatwo rozwiązać ten problem. Wykonaj następujące czynności:

Skopiuj i wklej listę kolumn w odwrotnej kolejności w pionie

1. Najpierw skopiuj i wklej swoje dane w nowe miejsce, a następnie przytrzymaj ALT + F11 klawisze, aby otworzyć Microsoft Visual Basic for Applications okno.

2. Kliknij wstawka > Modułi wklej następujący kod w Moduł Okno.

Kod VBA: Skopiuj i wklej zakres komórek w odwrotnej kolejności w pionie

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. Następnie naciśnij F5 klucz do uruchomienia tego kodu i pojawi się okno zachęty przypominające o wyborze zakresu danych, który chcesz odwrócić w pionie, patrz zrzut ekranu:

4. A następnie kliknij OK przycisk, a zakres danych został odwrócony w pionie, jak pokazano poniżej zrzuty ekranu:


Skopiuj i wklej zakres komórek w odwrotnej kolejności w poziomie

Aby odwrócić zakres danych w kolejności poziomej, zastosuj poniższy kod VBA:

Kod VBA: Skopiuj i wklej zakres komórek w odwrotnej kolejności w poziomie

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

Po uruchomieniu tego kodu w razie potrzeby otrzymasz następujące zrzuty ekranu:


Skopiuj i wklej szereg kolumn lub wierszy w odwrotnej kolejności dzięki niesamowitej funkcji

Jeśli nie jesteś zaznajomiony z powyższymi formułami i kodami VBA, tutaj polecę proste narzędzie-Kutools dla programu Excel, Z siedzibą w Odwróć zakres pionowy i Odwróć zakres poziomy funkcje, możesz odwrócić zakres komórek w pionie i poziomie za pomocą jednego kliknięcia.

Porady:Aby to zastosować Odwróć zakres pionowy i Odwróć zakres poziomy funkcje, po pierwsze, należy pobrać plik Kutools dla programu Excel, a następnie szybko i łatwo zastosuj tę funkcję.

Po zainstalowaniu Kutools dla programu Excel, zrób tak:

Skopiuj i wklej zakres komórek w odwrotnej kolejności w poziomie

1. Wybierz zakres komórek, a następnie kliknij Kutools > łodzie > Odwróć zakres pionowy > Wszystkie (tylko odwróć wartości)zobacz zrzut ekranu:

2. A następnie zakres wartości komórek został jednocześnie odwrócony w pionie, patrz zrzuty ekranu:


Skopiuj i wklej zakres komórek w odwrotnej kolejności w poziomie

1. Wybierz zakres komórek, a następnie kliknij Kutools > łodzie > Odwróć zakres poziomy > Wszystkie (tylko odwróć wartości)zobacz zrzut ekranu:

2. A potem wszystkie wartości komórek w zaznaczeniu zostały natychmiast odwrócone w poziomie, patrz zrzuty ekranu:

Kliknij, aby pobrać Kutools dla programu Excel i bezpłatną wersję próbną teraz!


Więcej względnych artykułów do kopiowania i wklejania:

  • Skopiuj i wklej scalone komórki do pojedynczych komórek w programie Excel
  • Zwykle po skopiowaniu scalonych komórek i wklejeniu ich do innych komórek scalone komórki zostaną wklejone bezpośrednio. Ale chcesz wkleić te połączone komórki do pojedynczych komórek, jak pokazano na poniższym zrzucie ekranu, abyś mógł poradzić sobie z danymi według potrzeb. W tym artykule omówię, jak skopiować i wkleić scalone komórki do pojedynczych komórek.
  • Skopiuj kolumnę i wklej tylko unikalne rekordy w programie Excel
  • W przypadku kolumny z wieloma duplikatami może być konieczne uzyskanie kopii tej listy zawierającej tylko unikalne wartości. Jak możesz to osiągnąć? W tym artykule przedstawiamy dwie metody wklejania tylko unikatowych rekordów z listy kolumn w programie Excel.
  • Skopiuj dane z chronionego arkusza
  • Przypuśćmy, że otrzymujesz plik Excela od innej osoby, który z arkuszami roboczymi jest chroniony przez użytkownika, teraz chcesz skopiować i wkleić surowe dane do innego nowego skoroszytu. Jednak danych w chronionym arkuszu nie można wybrać i skopiować, ponieważ użytkownik odznaczył opcje Wybierz zablokowane komórki i Wybierz odblokowane komórki podczas ochrony arkusza.

  • Pasek Super Formula (łatwo edytować wiele wierszy tekstu i formuły); Układ do czytania (łatwe odczytywanie i edytowanie dużej liczby komórek); Wklej do filtrowanego zakresu...
  • Scal komórki / wiersze / kolumny i przechowywanie danych; Podziel zawartość komórek; Połącz zduplikowane wiersze i sumę / średnią... Zapobiegaj zduplikowanym komórkom; Porównaj zakresy...
  • Wybierz Duplikat lub Unikalny Wydziwianie; Wybierz puste wiersze (wszystkie komórki są puste); Super Find i Fuzzy Find w wielu zeszytach ćwiczeń; Losowy wybór ...
  • Dokładna kopia Wiele komórek bez zmiany odwołania do formuły; Automatyczne tworzenie odniesień do wielu arkuszy; Wstaw punktory, Pola wyboru i nie tylko ...
  • Ulubione i szybkie wstawianie formuł, Zakresy, wykresy i obrazy; Szyfruj komórki z hasłem; Utwórz listę mailingową i wysyłaj e-maile ...
  • Wyodrębnij tekst, Dodaj tekst, Usuń według pozycji, Usuń przestrzeń; Tworzenie i drukowanie podsumowań stronicowania; Konwertuj zawartość komórek i komentarze...
  • Super filtr (zapisz i zastosuj schematy filtrów do innych arkuszy); Zaawansowane sortowanie według miesiąca / tygodnia / dnia, częstotliwości i innych; Specjalny filtr pogrubieniem, kursywą ...
  • Połącz skoroszyty i arkusze robocze; Scal tabele na podstawie kluczowych kolumn; Podziel dane na wiele arkuszy; Konwersja wsadowa xls, xlsx i PDF...
  • Grupowanie tabel przestawnych według numer tygodnia, dzień tygodnia i więcej ... Pokaż odblokowane, zablokowane komórki w różnych kolorach; Podświetl komórki, które mają formułę / nazwę...
karta kte 201905
  • Włącz edycję i czytanie na kartach w programach Word, Excel, PowerPoint, Publisher, Access, Visio i Project.
  • Otwieraj i twórz wiele dokumentów w nowych kartach tego samego okna, a nie w nowych oknach.
  • Zwiększa produktywność o 50% i redukuje setki kliknięć myszką każdego dnia!
officetab dół
Comments (3)
Rated 5 out of 5 · 1 ratings
This comment was minimized by the moderator on the site
OFFSET($A$15,-(ROW(A1)-1),0) and OFFSET($A$1,,COUNTA(1:1)-COLUMN(A1),) do not work when the data is not located in the first row or column.
these functions seem to work better:

Mirror row:
suppose the data is located in G11:K11
OFFSET($G$11,,COUNTA(11:11)-COUNTA($G$11:G11),) ........ OFFSET($G$11,,COUNTA(11:11)-COUNTA($G$11:K11),)

Mirror column:
suppose the data is located in E22:E26
OFFSET($E$22,ROW($E$26)-ROW(E22),0) ........ OFFSET($E$22,ROW($E$26)-ROW(E26),0)
Rated 5 out of 5
This comment was minimized by the moderator on the site
Hello Nasrin,

How are you. I tried your formulas and they work perfectly. Thanks for your share. We will take your advice. Have a great day.

Sincerely,
Mandy
This comment was minimized by the moderator on the site
Me funcionó la opción del código VBA. Muchas gracias!!!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations