Przejdź do głównej zawartości

Jak szybko usunąć co drugi wiersz w programie Excel?

Jeśli chcesz szybko usunąć co drugi wiersz lub kolumnę w programie Excel, głównym celem jest szybkie wybranie najpierw co drugiego wiersza lub kolumny, a następnie zastosowanie do nich operacji usuwania. W tym artykule dowiesz się, jak najpierw wybrać co drugi wiersz lub kolumnę, a następnie szybko je usunąć.

Usuń co drugi wiersz w programie Excel za pomocą polecenia Filtruj

Usuń co drugi wiersz w programie Excel za pomocą kodu VBA

Usuń co drugi wiersz lub kolumnę w programie Excel za pomocą Kutools for Excel


strzałka niebieski prawy bąbelek Usuń co drugi wiersz w programie Excel za pomocą polecenia Filtruj

Microsoft Excel's FILTRY polecenie może pomóc szybko przefiltrować co drugi wiersz, a następnie usunąć je od razu, wykonaj następujące czynności:

1. W pustej kolumnie obok oryginalnych danych wprowadź 0,1,0,1…, 0,1. W tym przypadku wpisujemy liczby w kolumnie pomocniczej C. Zobacz poniższy zrzut ekranu:

2. Wybierz kolumnę C i kliknij FILTRY przycisk pod Dane patka. Następnie kliknij przycisk strzałki obok C1 i zaznacz tylko 0 pod Zaznacz wszystko opcja. Zobacz zrzut ekranu:

3. Następnie wszystkie wiersze z 1 są ukryte. Wybierz widoczne wiersze z 0 i kliknij Strona główna > Usuń > Usuń wiersze arkusza aby usunąć te wiersze. Następnie usuwa co drugi wiersz i musisz kliknąć FILTRY ponownie, aby wyświetlić tylko wiersze z 1. Zobacz zrzuty ekranu:

dokument-usuń-każdy-inny-wiersz5 -2 dokument-usuń-każdy-inny-wiersz12

4. W końcu możesz usunąć kolumnę pomocnika C, jak potrzebujesz.


Wybierz co drugi lub n-ty wiersz i kolumnę, a następnie usuń je od razu

Kutools dla programu Excel's Wybierz Wiersze i kolumny przedziałów narzędzie może pomóc Ci znaleźć i wybrać co drugi lub n-ty wiersz lub kolumnę, a następnie możesz wykonać niektóre operacje, zgodnie z potrzebami. Kliknij, aby pobrać Kutools dla programu Excel!


strzałka niebieski prawy bąbelek Usuń co drugi wiersz w programie Excel za pomocą kodu VBA

Właściwie makro VBA jest również dobrym wyborem do rozwiązania tego problemu.

1. Przytrzymaj przycisk inny + F11 klucze w programie Excel i otwiera plik Microsoft Visual Basic for Applications okno.

2. Kliknij wstawka > Modułi wklej następujące makro w Moduł Okno.

Kod VBA: Usuń co drugi wiersz w zaznaczeniu:

Sub DeleteEveryOtherRow()
'Updateby Extendoffice
Dim rng As Range
Dim InputRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Application.ScreenUpdating = False
For i = InputRng.Rows.Count To 1 Step -2
    Set rng = InputRng.Cells(i, 1)
    rng.EntireRow.Delete
Next
Application.ScreenUpdating = True
End Sub

3. Naciśnij F5 klucz do uruchomienia tego makra. Następnie pojawia się okno dialogowe wyboru zakresu. Zobacz zrzut ekranu:

4. Następnie kliknij OK, co drugi wiersz w wybranym zakresie z drugiego wiersza jest usuwany od razu, patrz zrzut ekranu:

dokument-usuń-każdy-inny-wiersz5 -2 dokument-usuń-każdy-inny-wiersz12

strzałka niebieski prawy bąbelek Usuń co drugi wiersz lub kolumnę w programie Excel za pomocą Kutools for Excel

Dla początkującego użytkownika programu Microsoft Excel używanie makra VBA jest nieco skomplikowane. Plik Wybierz Wiersze i kolumny przedziałów użyteczność Kutools dla programu Excel może pomóc szybko usunąć co drugi wiersz.

Kutools dla programu Excel : z ponad 300 poręcznymi dodatkami Excela, które można wypróbować bez ograniczeń w ciągu 30 dni. 

Po zainstalowaniu Kutools dla programu Excelwykonaj następujące czynności:

1. Wybierz zakres, który chcesz usunąć co inne wiersze, a następnie zastosuj to narzędzie, klikając plik Kutools > Wybierz > Wybierz Wiersze i kolumny z przedziałami czasu….

2. W Wybierz Wiersze i kolumny przedziałów w oknie dialogowym określ ustawienia, jak pokazano na poniższym zrzucie ekranu, i kliknij OK , aby najpierw wybrać co pozostałe wiersze.

3. Następnie co drugi wiersz w zaznaczeniu jest zaznaczony i podświetlony. Zobacz zrzut ekranu:

4. Następnie możesz szybko usunąć zaznaczone co inne wiersze, klikając Strona główna > Usuń > Usuń wiersze arkusza aby usunąć wszystkie te wiersze. Zobacz zrzuty ekranu:

dokument-usuń-każdy-inny-wiersz5 -2 dokument-usuń-każdy-inny-wiersz12

Kliknij, aby dowiedzieć się więcej o tej funkcji Wybierz wiersze i kolumny przedziałów.

Dzięki tej funkcji możesz również usunąć co n-ty wiersz lub kolumnę, zgodnie z potrzebami.

Pobierz i bezpłatną wersję próbną Kutools dla programu Excel teraz!


strzałka niebieski prawy bąbelekDemo: Usuń co drugi wiersz lub kolumnę za pomocą Kutools for Excel

Kutools dla programu Excel: z ponad 300 poręcznymi dodatkami do programu Excel, które można wypróbować bez ograniczeń w ciągu 30 dni. Pobierz i bezpłatną wersję próbną teraz!

Najlepsze narzędzia biurowe

🤖 Pomocnik AI Kutools: Zrewolucjonizuj analizę danych w oparciu o: Inteligentne wykonanie   |  Wygeneruj kod  |  Twórz niestandardowe formuły  |  Analizuj dane i generuj wykresy  |  Wywołaj funkcje Kutools...
Popularne funkcje: Znajdź, wyróżnij lub zidentyfikuj duplikaty   |  Usuń puste wiersze   |  Łącz kolumny lub komórki bez utraty danych   |   Okrągły bez wzoru ...
Super wyszukiwanie: Wiele kryteriów VLookup    Wiele wartości VLookup  |   Przeglądanie pionowe na wielu arkuszach   |   Wyszukiwanie rozmyte ....
Zaawansowana lista rozwijana: Szybko twórz listę rozwijaną   |  Zależna lista rozwijana   |  Lista rozwijana wielokrotnego wyboru ....
Menedżer kolumn: Dodaj określoną liczbę kolumn  |  Przesuń kolumny  |  Przełącz stan widoczności ukrytych kolumn  |  Porównaj zakresy i kolumny ...
Polecane funkcje: Fokus siatki   |  Widok projektu   |   Duży pasek formuły    Menedżer skoroszytów i arkuszy   |  Biblioteka zasobów (Automatyczny tekst)   |  Selektor dat   |  Połącz arkusze   |  Szyfruj/odszyfruj komórki    Wysyłaj e-maile według listy   |  Super filtr   |   Specjalny filtr (filtruj pogrubienie/kursywa/przekreślenie...) ...
15 najlepszych zestawów narzędzi12 Tekst Tools (Dodaj tekst, Usuń znaki, ...)   |   50 + Wykres rodzaje (Wykres Gantta, ...)   |   40+ Praktyczne Wzory (Oblicz wiek na podstawie urodzin, ...)   |   19 Wprowadzenie Tools (Wstaw kod QR, Wstaw obraz ze ścieżki, ...)   |   12 Konwersja Tools (Liczby na słowa, Przeliczanie walut, ...)   |   7 Połącz i podziel Tools (Zaawansowane wiersze łączenia, Podział komórki, ...)   |   ... i więcej

Zwiększ swoje umiejętności Excela dzięki Kutools for Excel i doświadcz wydajności jak nigdy dotąd. Kutools dla programu Excel oferuje ponad 300 zaawansowanych funkcji zwiększających produktywność i oszczędzających czas.  Kliknij tutaj, aby uzyskać funkcję, której najbardziej potrzebujesz...

Opis


Karta Office wprowadza interfejs z zakładkami do pakietu Office i znacznie ułatwia pracę

  • 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!
Comments (11)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
An easy way to put 0 or 1 in the column instead is to add a formula column: =IF(MOD(ROW(), 2) = 0, 0, 1). That might help if you'd rather not type 0,1,01, etc.
This comment was minimized by the moderator on the site
another way is to add a new column in front of your data, so column A is blank, then just enter a b a b a b as you go down the rows in column A - so "a" in A1, "b" in A2, "a" in A3, "b" in A4. then you can drag the new "a" and "b" cells down for all rows of data. then sort column A alphabetically, and you get all the odd rows with an "a" at the top and all the even rows with a "b" at the bottom. this is probably the easiest way.
This comment was minimized by the moderator on the site
You're genious :)
This comment was minimized by the moderator on the site
Easiest? How is that different from the 0,1 method? ;-)
This comment was minimized by the moderator on the site
This is actually very useful if you have a large number of rows and can't enter the 2 settings in manually. if you drag 0,1 down, it continues to 2, 3, 4...but if you drag a,b down, it will repeat as a,b,a,b...all the way down. Thanks!
This comment was minimized by the moderator on the site
That would be great, except column C is all 0
This comment was minimized by the moderator on the site
This is really really helpful. thanks
This comment was minimized by the moderator on the site
Great trick...thank you. I love simple sneaky tricks like this
This comment was minimized by the moderator on the site
This was really helpful. thanks,
This comment was minimized by the moderator on the site
In cell B1: =row(A1) Drag this down all of column B. In cell C1: =mod(B1,2) Drag this down all of column C. Apply a filter and in column C select all 0s or 1s as required.
This comment was minimized by the moderator on the site
Richarddddd, Sneaky! I like that, and it was useful to me today. Thanks.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations