Kazalo
V tem kratkem vodniku je razloženo, kako s filtriranjem ali s kodo VBA izbrišete vsako drugo vrstico v Excelu. Naučili se boste tudi, kako odstraniti vsako 3., 4. ali katero koli drugo N-to vrstico.
V številnih primerih boste morda morali izbrisati nadomestne vrstice v delovnih listih programa Excel. Morda boste na primer želeli ohraniti podatke za sode tedne (vrstice 2, 4, 6, 8 itd.) in vse lihe tedne (vrstice 3, 5, 7 itd.) premakniti v drug list.
Na splošno je brisanje vsake druge vrstice v Excelu omejeno na izbiro nadomestnih vrstic. Ko so vrstice izbrane, z eno potezo na Izbriši V nadaljevanju tega članka se boste naučili nekaj tehnik za hitro izbiro in brisanje vsake druge ali vsake N-te vrstice v Excelu.
Kako izbrisati vsako drugo vrstico v Excelu s filtriranjem
V bistvu je običajen način za brisanje vsake druge vrstice v Excelu naslednji: najprej filtrirate nadomestne vrstice, nato jih izberete in izbrišete vse naenkrat. Podrobni koraki sledijo v nadaljevanju:
- V prazen stolpec poleg prvotnih podatkov vnesite zaporedje ničel in enic. To lahko hitro storite tako, da v prvo celico vnesete 0, v drugo 1, nato pa prvi dve celici kopirate in ju prilepite v stolpec do zadnje celice s podatki.
Uporabite lahko tudi to formulo:
=MOD(ROW(),2)Logika formule je zelo preprosta: funkcija ROW vrne trenutno številko vrstice, funkcija MOD jo deli z 2 in vrne ostanek, zaokrožen na celo število.
Rezultat je 0 v vseh lihih vrsticah (ker se delijo z 2 enakomerno brez ostanka) in 1 v vseh lihih vrsticah:
- Glede na to, ali želite izbrisati sodo ali liho vrstico, filtrirajte enice ali ničle.
Če želite to narediti, izberite katero koli celico v stolpcu Pomočnik, pojdite v Podatki zavihek> Razvrščanje in filtriranje in kliknite skupino Filter gumb. V vseh celicah glave se prikažejo puščice s spustnim filtrom. Kliknite gumb s puščico v stolpcu Pomočnik in označite eno od polj:
- 0 za brisanje sodih vrstic
- 1 za brisanje lihih vrstic
V tem primeru bomo odstranili vrstice z vrednostmi "0", zato jih filtriramo:
- Zdaj, ko so vse vrstice "1" skrite, izberite vse vidne vrstice "0", desno kliknite na izbor in kliknite Brisanje vrstice :
- Po zgornjem koraku ste dobili prazno tabelo, vendar ne skrbite, vrstice "1" so še vedno tam. Če jih želite ponovno prikazati, preprosto odstranite samodejni filter s klikom na Filter ponovno pritisnite gumb :
- Formula v stolpcu C se preračuna za preostale vrstice, vendar je ne potrebujete več. Zdaj lahko varno izbrišete pomožni stolpec:
Tako so v našem delovnem listu ostali le sodi tedni, lihih tednov ni več!
Nasvet: Če želite vsako drugo vrstico premakniti drugam, namesto da bi jo popolnoma izbrisali, najprej kopirajte filtrirane vrstice in jih prilepite na novo mesto, nato pa filtrirane vrstice izbrišite.
Kako izbrisati nadomestne vrstice v Excelu z VBA
Če niste pripravljeni zapravljati časa za trivialno opravilo, kot je brisanje vsake druge vrstice v delovnih listih programa Excel, lahko postopek avtomatizirate z naslednjim makrom VBA:
Sub Delete_Alternate_Rows_Excel() Dim SourceRange As Range Set SourceRange = Application.Selection Set SourceRange = Application.InputBox("Range:" , "Select the range" , SourceRange.Address, Type :=8) If SourceRange.Rows.Count>= 2 Then Dim FirstCell As Range Dim RowIndex As Integer Application.ScreenUpdating = False For RowIndex = SourceRange.Rows.Count - (SourceRange.Rows.Count Mod 2) To 1Korak -2 Set FirstCell = SourceRange.Cells(RowIndex, 1) FirstCell.EntireRow.Delete Next Application.ScreenUpdating = True End If End SubKako izbrisati vsako drugo vrstico v Excelu z uporabo makra
Makro vstavite v delovni list na običajen način prek urejevalnika Visual Basic:
- Pritisnite Alt + F11, da odprete okno Visual Basic for Applications.
- V zgornji menijski vrstici kliknite Vstavite > Modul in prilepite zgornji makro v Modul
- Pritisnite tipko F5, da zaženete makro.
- Pojavilo se bo pogovorno okno, ki vas bo pozvalo k izbiri območja. Izberite tabelo in kliknite V redu:
Končano! Vsaka druga vrstica v izbranem območju je izbrisana:
Kako izbrisati vsako N-to vrstico v Excelu
Pri tej nalogi bomo razširili tehniko filtriranja, ki smo jo uporabili za odstranitev vsake druge vrstice. Razlika je v formuli, na kateri temelji filtriranje:
MOD(ROW()- m , n )Kje:
- m je številka vrstice prve celice s podatki minus 1
- n je N-ta vrstica, ki jo želite izbrisati.
Recimo, da se vaši podatki začnejo v vrstici 2 in želite izbrisati vsako tretjo vrstico. n je enak 3 in m enaka 1 (vrstica 2 minus 1):
=MOD(VRSTICA() - 1, 3)
Če se naši podatki začnejo v vrstici 3, potem m bi bila enaka 2 (vrstica 3 minus 1) in tako naprej. Ta popravek je potreben za zaporedno številčenje vrstic, začenši s številko 1.
Formula deli relativno število v vrstici s 3 in vrne ostanek po deljenju. V našem primeru daje ničlo za vsako tretjo vrstico, ker se vsako tretje število deli s 3 brez ostanka (3,6,9 itd.):
Zdaj pa izvedete že znane korake za filtriranje vrstic "0":
- Izberite katero koli celico v tabeli in kliknite Filter gumb na Podatki
- Filtrirajte stolpec Pomočnik, da se prikažejo samo vrednosti "0".
- Izberite vse vidne vrstice "0", kliknite z desno tipko miške in izberite Brisanje vrstice iz kontekstnega menija.
- Odstranite filter in izbrišite stolpec Pomočnik.
Na podoben način lahko v Excelu izbrišete vsako 4., 5. ali katero koli drugo N-to vrstico.
Nasvet. Če morate odstraniti vrstice z nepomembnimi podatki, vam bo v pomoč naslednje navodilo: Kako izbrisati vrstice na podlagi vrednosti celic.
Zahvaljujem se vam za branje in upam, da se naslednji teden spet vidimo na našem blogu.
