Kako v Excelu izbrisati vrstice, ki ne vsebujejo določenega besedila?

Mogoče nekateri od vas veste, kako izbrisati celotne vrstice, če vsebujejo nekatera besedila v Excelu, če pa želite celotno vrstico, ko ne vsebujejo določenih besedil, kako to storiti? Zdaj, sledite tej vadnici, boste morda našli način za rešitev te težave v Excelu.

S filtrom izbrišite vrstice, ki ne vsebujejo določenega besedila

Z VBA izbrišite vrstice, ki ne vsebujejo določenega besedila

Z Kutools za Excel izbrišite vrstice, ki ne vsebujejo določenega besedila

---

S filtrom izbrišite vrstice, ki ne vsebujejo določenega besedila

V Excelu vam lahko funkcija filtriranja hitro pomaga filtrirati vrstice, ki ne vsebujejo določenega besedila, nato pa jih lahko izberete za brisanje.

1. Izberite stolpec, ki vsebuje besedila, na podlagi katerih boste odstranili vrstice, in kliknite datum > filter. Oglejte si posnetek zaslona:

2. V glavi stolpca je gumb za filter in kliknite nanj, da odprete spustni seznam, označite vse, razen določenega besedila, na katerem želite temeljiti. Oglejte si posnetek zaslona:

3. Nato lahko vidite samo vrstico z glavo in vrstice, ki ne vsebujejo določenega besedila, so filtrirane. Oglejte si posnetek zaslona:

4. Izberite vse, razen vrstice z glavo, in z desno miškino tipko izberite Izbriši vrstico iz kontekstnega menija. Oglejte si posnetek zaslona:

5. Nato kliknite datum > filter in nato se izbrišejo vse vrstice, ki ne vsebujejo določenega besedila. Oglejte si posnetek zaslona:

---

Z VBA izbrišite vrstice, ki ne vsebujejo določenega besedila

VBA je zelo uporaben za nekoliko zahtevne operacije v Excelu in sledite spodnjim korakom, da izbrišete vrstice, ki ne vsebujejo določenega besedila.

1. Pritisnite Alt + F11 za prikaz Microsoft Visual Basic za aplikacije okno.

2. V oknu kliknite Vstavi > Moduli za prikaz novega okna modula, nato v okno modula kopirajte naslednjo kodo VBA.

VBA: Če celica vsebuje določeno besedilo, izbrišite celotno vrstico.

Sub DeleteRowNoInclude()
'Updateby Extendoffice
Dim xRow As Range
Dim rng As Range
Dim WorkRng As Range
Dim xStr As String
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
xStr = Application.InputBox("Text", xTitleId, "", Type:=2)
Application.ScreenUpdating = False
For i = WorkRng.Rows.Count To 1 Step -1
    Set xRow = WorkRng.Rows(i)
    Set rng = xRow.Find(xStr, LookIn:=xlValues)
    If rng Is Nothing Then
       xRow.Delete
    End If
Next
Application.ScreenUpdating = True
End Sub

3. klik Run in odpre se pogovorno okno za izbiro obsega, ki bo deloval. Oglejte si posnetek zaslona:

4. Nato kliknite OKin v drugo pojavno pogovorno okno vnesite besedilo, na katerem želite odstraniti osnovo vrstic. Oglejte si posnetek zaslona:

5. klik OKin vrstice, ki ne vsebujejo Apple, bodo odstranjene.

---

Z Kutools za Excel izbrišite vrstice, ki ne vsebujejo določenega besedila

Če menite, da zgornje metode za vas niso enostavne, lahko uporabite Kutools za Excel's Izberite Specific Cells lastnost.

Kutools za Excel vključuje več kot 300 priročnih orodij Excel. Brezplačno poskusite brez omejitev v 30 dneh. Get it now

1. Izberite stolpec, v katerem želite izbrisati vrstice, ki ne vsebujejo določenega besedila, in kliknite Kutools > Izberite Orodja > Izberite Specific Cells. Oglejte si posnetek zaslona:

2. In v Izberite Specific Cells pogovorno okno, preverite Cela vrsticain izberite Ne vsebujein vnesite določeno besedilo v besedilno polje, lahko pa tudi kliknete gumb obsega v Posebna vrsta , da izberete celico, ki vsebuje določeno besedilo.

3. Nato kliknite Ok, nato so izbrane vrstice, ki ne vsebujejo določenega besedila, z desno miškino tipko izberite Brisanje iz kontekstnega menija. Oglejte si posnetek zaslona:

4. Zdaj so odstranjene vse vrstice, ki v obsegu ne vsebujejo določenega besedila. Kliknite jo za več informacij o Select Specific Cells.

---

Relativni članki:

• Če celica v Excelu ne vsebuje nič, izbrišite celotne vrstice
• Na drugem listu izbrišite vrstice, ki se ne ujemajo z merili