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

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)

Uwagi: 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),)

Uwagi: 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 > Zakres > 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 > Zakres > 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ół
Sortuj komentarze według
Komentarze (3)
Znamionowy 5 z 5 · 1 oceny
Ten komentarz został zminimalizowany przez moderatora na stronie
Me funcionó la opción del código VBA. Bardzo dziękuję!!!
Ten komentarz został zminimalizowany przez moderatora na stronie
OFFSET($A$15,-(ROW(A1)-1),0) i OFFSET($A$1,,COUNTA(1:1)-COLUMN(A1),) nie działają, gdy dane nie znajdują się w pierwszy wiersz lub kolumna.
te funkcje wydają się działać lepiej:

Rząd lustrzany:
załóżmy, że dane znajdują się w G11:K11
OFFSET($G$11,,COUNTA(11:11)-COUNTA($G$11:G11),) ........ OFFSET($G$11,,COUNTA(11:11)-COUNTA($G$11:K11),)

Kolumna lustrzana:
załóżmy, że dane znajdują się w E22:E26
OFFSET($E$22,ROW($E$26)-ROW(E22),0) ........ OFFSET($E$22,ROW($E$26)-ROW(E26),0)
Znamionowy 5 z 5
Ten komentarz został zminimalizowany przez moderatora na stronie
Witaj Nasrinie,

Jak się masz. Wypróbowałem Twoje formuły i działają idealnie. Dzięki za twój udział. Posłuchamy twojej rady. Miłego dnia.

Pozdrawiamy,
Mandy
Nie ma tu jeszcze żadnych komentarzy

Bądż na bieżąco

Prawa autorskie © 2009 - www.extendoffice.com. | Wszelkie prawa zastrzeżone. Zasilany przez ExtendOffice, | Mapa strony
Microsoft i logo Office są znakami towarowymi lub zastrzeżonymi znakami towarowymi Microsoft Corporation w Stanach Zjednoczonych i / lub innych krajach.
Chronione przez Sectigo SSL