Kako izbrisati vrstice, če je celica večja / manjša od določene vrednosti v Excelu?
Včasih boste morda morali izbrisati vrstice, če so celice v določenem stolpcu večje ali manjše od določene vrednosti v Excelu. Ta članek bo priporočil več načinov za reševanje te težave.
Če je celica večja / manjša od določene vrednosti s kodo VBA, izbrišite vrstice
Z Kutools za Excel izbrišite vrstice, če je celica večja / manjša od določene vrednosti
Z Kutoos za Excel izbrišite vrstice, če je celica večja / manjša od določene vrednosti
Če je celica večja / manjša od določene vrednosti s kodo VBA, izbrišite vrstice
Recimo, da želite izbrisati celotne vrstice, če je celica v stolpcu D večja ali manjša od določene vrednosti v Excelu. Če jo želite doseči, lahko zaženete naslednjo kodo VBA.
1. Pritisnite druga + F11 tipke hkrati, da odprete Microsoft Visual Basic za aplikacije okno.
2. V Ljubljani Microsoft Visual Basic za aplikacije okno, kliknite Vstavi > modul. Nato kopirajte in prilepite spodnjo kodo VBA v okno Code.
Koda VBA: Izbrišite vrstice, če je celica večja / manjša od določene vrednosti v Excelu
Public Sub ProcessData()
Dim xRg As Range
Dim xTxt As String
On Error Resume Next
If ActiveWindow.RangeSelection.Count > 1 Then
xTxt = ActiveWindow.RangeSelection.AddressLocal
Else
xTxt = ActiveSheet.UsedRange.AddressLocal
End If
Set xRg = Application.InputBox("Please select range:", "Kutools for Excel", xTxt, , , , , 8)
If xRg Is Nothing Then Exit Sub
If (xRg.Areas.Count > 1) Or (xRg.Columns.Count > 1) Then
MsgBox "You can only select one column per time", vbInformation, "Kutools for Excel"
Exit Sub
End If
xRg.Range("A1").EntireRow.Insert
Set xRg = xRg.Range("A1").Offset(-1).Resize(xRg.Rows.Count + 1)
xRg.Range("A1") = "Temp"
xRg.AutoFilter 1, ">30000"
Set xRg = Application.Intersect(xRg, xRg.SpecialCells(xlCellTypeVisible))
On Error GoTo 0
If Not xRg Is Nothing Then xRg.EntireRow.Delete
End SubOpombe: V zgornji kodi> 30000 pomeni, da boste izbrisali vrstice, če so celice večje od 30000 v določenem stolpcu. Če želite izbrisati vrstice, če so celice manjše od določene vrednosti, spremenite znak> na <in nato določite svojo vrednost.
3. Pritisnite F5 tipko za zagon kode v pojavnem oknu Kutools za Excel v pogovornem oknu izberite obseg (en stolpec), ki ga boste našli, če so celice v tem stolpcu večje ali manjše od določene vrednosti. In nato kliknite OK . Oglejte si posnetek zaslona:
Nato se vse vrstice z vrednostjo celice nad 30000 v stolpcu D takoj izbrišejo.
Z Kutools za Excel izbrišite vrstice, če je celica večja / manjša od določene vrednosti
O Izberite Specific Cells uporabnost Kutools za Excel vam lahko pomaga izbrati vse vrstice s celicami, večje ali manjše od določene vrednosti v določenem stolpcu, nato pa lahko vse izbrane vrstice hkrati izbrišete hkrati.
Pred vložitvijo vloge Kutools za ExcelProsim najprej ga prenesite in namestite.
1. Izberite stolpec, na podlagi katerega želite izbrisati vrstice, in kliknite Kutools > Izberite > Izberite Specific Cells. Oglejte si posnetek zaslona:
2. V Ljubljani Izberite Specific Cells pogovorno okno, izberite Cela vrstica v Vrsta izbire odsek. V Posebna vrsta izberite, izberite Večji kot or Manj kot s prvega spustnega seznama vnesite določeno vrednost v naslednje besedilno polje in kliknite na OK gumb.
3. Potem se prikaže pogovorno okno, ki vam pove, koliko vrstic je izbranih, kliknite OK . In vidite, da so vse vrstice z vrednostjo večjo od 30000 v stolpcu D izbrane takoj.
4. Z desno miškino tipko kliknite eno od izbranih vrstic in nato kliknite Brisanje v meniju z desnim klikom. In vse izbrane vrstice se izbrišejo.
Če želite imeti brezplačno (30-dnevno) preskusno različico tega pripomočka, kliknite, če ga želite prenestiin nato nadaljujte z uporabo postopka v skladu z zgornjimi koraki.
Z Kutoos za Excel izbrišite vrstice, če je celica večja / manjša od določene vrednosti
Poleg zgornjih dveh metod lahko v določenem stolpcu filtrirate vse vrstice s celicami, ki so večje ali manjše od določene vrednosti, in nato odstranite vse filtrirane vrstice z Izbriši skrite (vidne) vrstice in stolpce uporabnost Kutools za Excel.
Pred vložitvijo vloge Kutools za ExcelProsim najprej ga prenesite in namestite.
1. Izberite glavo stolpca in kliknite datum > filter. Oglejte si posnetek zaslona:
2. Kliknite puščico spustnega menija v stolpcu, na podlagi katerega boste izbrisali vrstice, nato kliknite Številčni filtri > Večji kot or Manj kot kot spodaj:
3. V Ljubljani Samodejni filter po meri v pogovorno okno vnesite določeno številko, potem ko je polje večje ali manjše od polja, in nato kliknite OK gumb.
4. Nato se vse vrstice z določenimi celicami, ki so večje ali manjše od določene vrednosti v stolpcu D, filtrirajo. Vse filtrirane vrstice lahko izbrišete tako, da izberete filtrirane podatke in nato kliknete Kutools > Brisanje > Izbriši skrite (vidne) vrstice in stolpce. Oglejte si posnetek zaslona:
5. V Ljubljani Izbriši skrite (vidne) vrstice in stolpce pogovorno okno, se prepričajte, da V izbranem obsegu možnost je izbrana v Poglej v spustnega seznama izberite Vrstice v Izbriši vrsto v razdelku določite možnost Vidne vrstice Podroben tip in na koncu kliknite OK gumb.
6. Nato se vse vidne vrstice v izbranem obsegu takoj izbrišejo, filter lahko prekličete s klikom datum > filter.
Če želite imeti brezplačno (30-dnevno) preskusno različico tega pripomočka, kliknite, če ga želite prenestiin nato nadaljujte z uporabo postopka v skladu z zgornjimi koraki.
Z Kutools za Excel izbrišite vrstice, če je celica večja / manjša od določene vrednosti
Sorodni članki:
- Kako izbrisati vse vrstice pod določeno vrstico ali aktivno celico v Excelu?
- Kako izbrisati vse vrstice, razen prve vrstice z glavo v Excelu?
Najboljša pisarniška orodja za produktivnost
Napolnite svoje Excelove spretnosti s Kutools za Excel in izkusite učinkovitost kot še nikoli prej. Kutools za Excel ponuja več kot 300 naprednih funkcij za povečanje produktivnosti in prihranek časa. Kliknite tukaj, če želite pridobiti funkcijo, ki jo najbolj potrebujete...
Kartica Office prinaša vmesnik z zavihki v Office in poenostavi vaše delo
- Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
- Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
- Poveča vašo produktivnost za 50%in vsak dan zmanjša na stotine klikov miške za vas!
