Šiame straipsnyje išvardyti keli būdai, kaip ištrinti eilutes "Excel" programoje pagal ląstelės vertę. Šiame pranešime rasite sparčiuosius klavišus, taip pat "Excel VBA". Ištrinkite eilutes automatiškai arba naudokite standartinę parinktį Rasti kartu su naudingais sparčiaisiais klavišais.

Programa "Excel" yra puikus įrankis saugoti duomenims, kurie kartkartėmis keičiasi. Tačiau atnaujinant lentelę po tam tikrų pakeitimų gali prireikti tikrai daug laiko. Užduotis gali būti tokia paprasta, kaip pašalinti visas tuščias "Excel" eilutes. Arba gali prireikti surasti ir ištrinti pasikartojančius duomenis. Vieną dalyką žinome tikrai - kai tik atsiranda ar išnyksta duomenys, ieškote geriausio sprendimo, kuris padėtų sutaupyti laiko dabartineidarbas.

Pavyzdžiui, turite turgavietę, kurioje įvairūs pardavėjai parduoda savo gaminius. Dėl tam tikrų priežasčių vienas iš pardavėjų uždarė savo verslą ir dabar reikia ištrinti visas eilutes, kuriose yra to pardavėjo pavadinimas, net jei jos yra skirtinguose stulpeliuose.

Šiame pranešime rasite "Excel" VBA ir sparčiuosius klavišus eilutėms ištrinti pagal tam tikrą tekstą ar reikšmę. Pamatysite, kaip lengvai rasti ir pasirinkti reikiamą informaciją prieš pašalinant. Jei jūsų užduotis susijusi ne su eilučių ištrynimu, o su jų pridėjimu, galite rasti, kaip tai padaryti straipsnyje Greičiausi būdai įterpti kelias eilutes "Excel".

Greičiausias "Excel" spartusis klavišas lentelės eilutėms ištrinti

Jei norite naudoti greičiausią kelių eilučių ištrynimo metodą pagal jose esančių ląstelių reikšmes, pirmiausia turite teisingai pasirinkti šias eilutes.

Norėdami pasirinkti eilutes, galite pažymėti gretimus langelius su reikiamomis reikšmėmis ir spustelėti Shift + Space arba pasirinkti reikiamus nesiribojančius langelius laikydami nuspaustą klavišą Ctrl.

Taip pat galite pasirinkti ištisas eilutes, naudodami eilučių numerių mygtukus. Šalia paskutinio mygtuko matysite pažymėtų eilučių numerį.

Pasirinkę reikiamas eilutes, galite greitai jas pašalinti naudodami "Excel" spartųjį klavišą "Ištrinti eilutę". Toliau rasite, kaip atsikratyti pasirinktų eilučių, nesvarbu, ar turite standartinę duomenų lentelę, ar lentelę, kurioje duomenys yra dešinėje.

Pašalinti eilutes iš visos lentelės

Jei turite paprastą "Excel" sąrašą, kurio dešinėje pusėje nėra papildomos informacijos, galite naudoti sparčiąją nuorodą "Ištrinti eilutę", kad pašalintumėte eilutes 2 paprastais veiksmais:

1. Paspauskite spartųjį klavišą Ctrl + - (pagrindinėje klaviatūroje - minus).

Pamatysite, kad nenaudojamos eilutės akimirksniu išnyks.

Patarimas. Galite pažymėti tik tą intervalą, kuriame yra norimų pašalinti verčių. Tada naudokite sparčiąją nuorodą Ctrl + - (minusas pagrindinėje klaviatūroje) norėdami gauti standartinį "Excel Ištrinti dialogo langas, kuriame galite pasirinkti Visa eilutė radijo mygtuką arba bet kurią kitą reikalingą šalinimo parinktį.

Ištrinkite eilutes, jei dešinėje lentelės pusėje yra duomenų

Ctrl + - (minus pagrindinėje klaviatūroje) "Excel" spartusis klavišas yra greičiausia priemonė eilutėms ištrinti. Tačiau jei pagrindinės lentelės dešinėje yra kokių nors duomenų, kaip toliau pateiktoje ekrano kopijoje, gali būti pašalintos eilutės kartu su informacija, kurią reikia išsaugoti.

Tokiu atveju duomenis reikia formatuoti kaip "Excel" lentelė pirma.

1. Paspauskite Ctrl + T arba eikite į Pagrindinis skirtukas -> Formatuoti kaip lentelę ir pasirinkite jums tinkamiausią stilių.

Pamatysite Sukurti lentelę dialogo langą, kurį galite naudoti norėdami pažymėti reikiamą diapazoną.

Dabar, kai sąrašas suformatuotas, lentelėje pasirinkite intervalą su vertėmis arba eilutėmis, kurias norite ištrinti.

Pastaba. Įsitikinkite, kad nenaudojate eilučių mygtukų visoms eilutėms pasirinkti.

Paspauskite Ctrl + - (minus pagrindinėje klaviatūroje), kad iš lentelės būtų pašalinti tik nepageidaujami duomenys. Dešinėje pusėje esanti papildoma informacija liks nepaliesta.

Tikimės, kad šis "pašalinti eilutę" spartusis klavišas jums buvo naudingas. Skaitykite toliau, kad rastumėte "Excel" VBA eilutėms šalinti ir sužinotumėte, kaip pašalinti duomenis pagal tam tikrą langelio tekstą.

Ištrinti eilutes, kuriose yra tam tikras tekstas viename stulpelyje

Jei eilutėse, kurias norite pašalinti, elementai yra tik viename stulpelyje, toliau aprašyti veiksmai padės jums pašalinti eilutes su tokiomis reikšmėmis.

1. Pirmiausia turite pritaikyti filtrą savo lentelei. Norėdami tai padaryti, eikite į Duomenys skirtuką "Excel" ir spustelėkite Filtras ikona.

Filtruokite stulpelį, kuriame yra trinti skirtos reikšmės, pagal reikiamą tekstą. Spustelėkite rodyklės piktogramą šalia stulpelio, kuriame yra reikiamų elementų. Tada panaikinkite žymėjimą Pasirinkite visus parinktį ir pažymėkite žymimuosius langelius šalia teisingų reikšmių. Jei sąrašas ilgas, tiesiog įveskite reikiamą tekstą į Paieška lauką. Tada spustelėkite GERAI patvirtinti.

Pasirinkite filtruotus eilučių, kurias norite ištrinti, langelius. Nebūtina pasirinkti visas eilutes.

Dešiniuoju pelės klavišu spustelėkite pažymėtą intervalą ir pasirinkite Ištrinti eilutę parinktį iš meniu sąrašo.

Galiausiai spustelėkite Filtras piktogramą dar kartą išvalykite ir pamatysite, kad eilutės su reikšmėmis išnyko iš lentelės.

Kaip pašalinti "Excel" eilutes pagal ląstelių spalvą

Filtravimo parinktis leidžia rūšiuoti duomenis pagal langelių spalvą. Ją galite naudoti norėdami ištrinti visas eilutes, kuriose yra tam tikra fono spalva.

1. Taikyti Filtras prie savo stalo. Eikite į Duomenys skirtuką "Excel" ir spustelėkite Filtras ikona.

Spustelėkite mažą rodyklę šalia reikiamo stulpelio pavadinimo, eikite į Filtruoti pagal spalvą ir pasirinkite tinkamą langelio spalvą. GERAI ir pamatysite visas paryškintas ląsteles viršuje.

Pasirinkite filtruotus spalvotus langelius, spustelėkite juos dešiniuoju pelės klavišu ir pasirinkite Ištrinti eilutę parinktį iš meniu.

Štai ir viskas! Eilutės su vienodos spalvos ląstelėmis akimirksniu pašalinamos.

Ištrinti eilutes, kuriose skirtinguose stulpeliuose yra tam tikro teksto

Jei vertės, kurias norite pašalinti, yra išsibarsčiusios įvairiuose stulpeliuose, rūšiavimas gali apsunkinti užduotį. Toliau rasite naudingą patarimą, kaip pašalinti eilutes pagal langelius, kuriuose yra tam tikrų verčių arba teksto. Iš toliau pateiktos lentelės noriu pašalinti visas eilutes, kuriose yra sausio, kuris yra 2 stulpeliuose.

1. Pradėkite ieškoti ir pasirinkite ląsteles su reikiama verte naudodami Rasti ir pakeisti dialogas. Spustelėkite Ctrl + F jį paleisti.

   Patarimas. Tą patį dialogo langą rasite, jei eisite į Pagrindinis skirtukas -> Rasti ir pasirinkti ir pasirinkite Rasti parinktį iš išskleidžiamojo sąrašo.

   

2. Įveskite reikiamą reikšmę į Raskite, ką lauką ir, jei reikia, pasirinkite visas papildomas parinktis. Tada paspauskite Rasti viską pamatyti rezultatą.

Rezultatai bus rodomi Rasti ir pakeisti langas.

Pasirinkite rastas vertes lange, laikydami Ctrl Paspauskite klavišą. Rastos reikšmės bus automatiškai paryškintos lentelėje.

Dabar eikite į Pagrindinis skirtukas -> Ištrinti -> Ištrinti lapo eilutes .

Patarimas. Galite ištrinti eilutes su pasirinktomis reikšmėmis, jei paspausite Ctrl + - (minusas pagrindinėje lentoje) ir pasirinkite radijo mygtuką Visos eilutės .

Voila! Nepageidaujamos eilutės ištrintos.

"Excel" VBA makrokomandos eilutėms ištrinti arba pašalinti kas antrą eilutę

Jei visada ieškote sprendimo, kaip automatizuoti vieną ar kitą "Excel" procedūrą, griebkite toliau pateiktas makrokomandas, kad supaprastintumėte eilučių šalinimo užduotį. Šioje dalyje rasite 2 VBA makrokomandas, kurios padės pašalinti eilutes su pasirinktomis ląstelėmis arba ištrinti kiekvieną kitą "Excel" eilutę.

Makro RemoveRowsWithSelectedCells bus pašalintos visos eilutės, kuriose yra bent vienas paryškintas langelis.

Makro RemoveEveryOtherRow kaip rodo jos pavadinimas, padės atsikratyti kas antros/trečios ir t. t. eilutės pagal jūsų nustatymus. Ji pašalins eilutes, pradedant nuo dabartinės pelės žymeklio vietos ir baigiant jūsų lentele.

Jei nežinote, kaip įterpti makrokomandas, kviečiame susipažinti su straipsniu Kaip įterpti ir paleisti VBA kodą programoje "Excel".

Sub RemoveRowsWithSelectedCells() Dim rngCurCell, rng2Delete As Range Application.ScreenUpdating = False Application.Calculation = xlCalculationManual For Each rngCurCell In Selection If Not rng2Delete Is Nothing Then Set rng2Delete = Application.Union(rng2Delete, _ ActiveSheet.Cells(rngCurCell.Row, 1)) Else Set rng2Delete = rngCurCell End If Next rngCurCell If Not rng2Delete Is Nothing Thenrng2Delete.EntireRow.Delete End If Application.ScreenUpdating = True Application.Calculation = xlCalculationAutomatic End Sub Sub RemoveEveryOtherRow() Dim rowNo, rowStart, rowFinish, rowStep As Long Dim rng2Delete As Range rowStep = 2 rowStart = Application.Selection.Cells(1, 1).Row rowFinish = ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Row Application.ScreenUpdating = FalseApplication.Calculation = xlCalculationManual For rowNo = rowStart To rowFinish Step rowStep If Not rng2Delete Is Nothing Then Set rng2Delete = Application.Union(rng2Delete, _ ActiveSheet.Cells(rowNo, 1)) Else Set rng2Delete = ActiveSheet.Cells(rowNo, 1) End If Next If Not rng2Delete Is Nothing Then rng2Delete.EntireRow.Delete ' Paslėpti kiekvieną kitą eilutę 'rng2Delete.EntireRow.Hidden = True End IfApplication.ScreenUpdating = True Application.Calculation = xlCalculationAutomatic End Sub

Patarimas. Jei jūsų užduotis yra nuspalvinti kas antrą/trečią ir t. t. eilutę skirtinga spalva, veiksmų rasite skyriuje "Eilučių spalvos ir stulpelių šešėliavimo kaitaliojimas "Excel" programoje (juostinės eilutės ir stulpeliai)".

Šiame straipsnyje aprašiau, kaip ištrinti eilutes "Excel" programoje. Dabar turite keletą naudingų VBA makrokomandų pasirinktoms eilutėms ištrinti, žinote, kaip pašalinti kiekvieną kitą eilutę ir kaip naudoti Find & amp; Replace, kad galėtumėte ieškoti ir pasirinkti visas eilutes su tomis pačiomis reikšmėmis prieš jas pašalinant. Tikiuosi, kad pirmiau pateikti patarimai supaprastins jūsų darbą "Excel" programoje ir leis jums gauti daugiau laisvo laiko mėgautis šiais paskutiniaisvasaros dienos. Būkite laimingi ir tobulėkite "Excel" programoje!