Cum se șterg rânduri dacă celula este mai mare / mai mică decât o anumită valoare în Excel?
Uneori poate fi necesar să ștergeți rânduri dacă celulele dintr-o coloană specificată sunt mai mari sau mai mici decât o anumită valoare în Excel. Acest articol va recomanda mai multe metode pentru a rezolva această problemă.
Ștergeți rândurile dacă celula este mai mare / mai mică decât o anumită valoare cu codul VBA
Ștergeți rândurile dacă celula este mai mare / mai mică decât o anumită valoare cu Kutools pentru Excel
Ștergeți rândurile dacă celula este mai mare / mai mică decât o anumită valoare cu Kutoos pentru Excel
Ștergeți rândurile dacă celula este mai mare / mai mică decât o anumită valoare cu codul VBA
Presupunând că doriți să ștergeți rânduri întregi dacă celula din coloana D este mai mare sau mai mică decât o anumită valoare în Excel. Puteți rula următorul cod VBA pentru a-l realiza.
1. presa Alt + F11 tastele simultan pentru a deschide Microsoft Visual Basic pentru aplicații fereastră.
2. În Microsoft Visual Basic pentru aplicații fereastră, faceți clic pe Insera > modul. Apoi copiați și lipiți codul VBA de mai jos în fereastra Cod.
Cod VBA: ștergeți rândurile dacă celula este mai mare / mai mică decât o anumită valoare în Excel
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 Sub
notițe: În codul de mai sus,> 30000 înseamnă că veți șterge rânduri dacă celulele sunt mai mari de 30000 într-o coloană specificată. Dacă doriți să ștergeți rânduri dacă celulele sunt mai mici decât o anumită valoare, vă rugăm să schimbați semnul> la <și apoi să specificați valoarea.
3. presa F5 tasta pentru a rula codul, în fereastra pop-up Kutools pentru Excel caseta de dialog, selectați intervalul (coloană unică) pe care îl veți găsi dacă celulele din această coloană sunt mai mari sau mai mici decât o anumită valoare. Și apoi faceți clic pe OK buton. Vedeți captura de ecran:
Apoi, toate rândurile cu valoare de celulă mai mare de 30000 în coloana D sunt șterse imediat.
Ștergeți rândurile dacă celula este mai mare / mai mică decât o anumită valoare cu Kutools pentru Excel
Selectați celule specifice utilitatea Kutools pentru Excel vă poate ajuta să selectați toate rândurile cu celule mai mari sau mai mici decât o anumită valoare într-o coloană specificată, iar apoi puteți șterge manual toate rândurile selectate simultan.
Înainte de a aplica Kutools pentru Excel, Vă rugăm să descărcați-l și instalați-l mai întâi.
1. Selectați coloana pe care doriți să ștergeți rândurile, apoi faceți clic pe Kutools > Selectați > Selectați celule specifice. Vedeți captura de ecran:
2. În Selectați celule specifice caseta de dialog, selectați Întregul rând în Tipul de selecție secțiune. În Tipul specific secțiune, selectați Mai mare ca or Mai puţin de din prima listă derulantă, introduceți valoarea anumită în următoarea casetă text, apoi faceți clic pe OK butonul.
3. Apoi apare o casetă de dialog pentru a vă spune câte rânduri sunt selectate, faceți clic pe OK buton. Și puteți vedea toate rândurile cu o valoare mai mare de 30000 în coloana D sunt selectate imediat.
4. Faceți clic dreapta pe unul dintre rândurile selectate, apoi faceți clic pe Șterge din meniul cu clic dreapta. Și toate rândurile selectate sunt șterse.
Dacă doriți să aveți o perioadă de încercare gratuită (30 de zile) a acestui utilitar, vă rugăm să faceți clic pentru a-l descărca, și apoi mergeți pentru a aplica operația conform pașilor de mai sus.
Ștergeți rândurile dacă celula este mai mare / mai mică decât o anumită valoare cu Kutoos pentru Excel
În plus față de cele două metode de mai sus, puteți filtra toate rândurile cu celule mai mari sau mai mici decât o anumită valoare într-o coloană specificată, apoi puteți elimina toate rândurile filtrate cu Ștergeți rândurile și coloana ascunse (vizibile) utilitatea Kutools pentru Excel.
Înainte de a aplica Kutools pentru Excel, Vă rugăm să descărcați-l și instalați-l mai întâi.
1. Selectați antetul coloanei, apoi faceți clic pe Date > Filtru. Vedeți captura de ecran:
2. Faceți clic pe săgeata derulantă din coloana pe care veți șterge rândurile, apoi faceți clic pe Filtre numerice > Mai mare ca or Mai puțin decât ca în imaginea de mai jos:
3. În Filtru automat personalizat caseta de dialog, introduceți un anumit număr după caseta este mai mare sau mai mică decât, apoi faceți clic pe OK butonul.
4. Apoi toate rândurile cu anumite celule care sunt mai mari sau mai mici decât o anumită valoare din coloana D sunt toate filtrate. Puteți șterge toate rândurile filtrate selectând datele filtrate și apoi faceți clic pe Kutools > Șterge > Ștergeți rândurile și coloanele ascunse (vizibile). Vedeți captura de ecran:
5. În Ștergeți rândurile și coloanele ascunse (vizibile) caseta de dialog, asigurați-vă că În gama selectată opțiunea este selectată în Uită-te în lista derulantă, selectați Rânduri în Ștergeți tipul , specificați opțiunea Rânduri vizibile în Tipul detaliat , apoi faceți clic pe OK butonul.
6. Apoi toate rândurile vizibile din intervalul selectat sunt șterse imediat, puteți anula filtrul făcând clic Date > Filtru.
Dacă doriți să aveți o perioadă de încercare gratuită (30 de zile) a acestui utilitar, vă rugăm să faceți clic pentru a-l descărca, și apoi mergeți pentru a aplica operația conform pașilor de mai sus.
Ștergeți rândurile dacă celula este mai mare / mai mică decât o anumită valoare cu Kutools pentru Excel
Legate de articole:
- Cum se șterg toate rândurile de sub anumite rânduri sau celule active din Excel?
- Cum să ștergeți toate rândurile, cu excepția primului rând de antet din Excel?
Cele mai bune instrumente de productivitate de birou
Îmbunătățiți-vă abilitățile Excel cu Kutools pentru Excel și experimentați eficiența ca niciodată. Kutools pentru Excel oferă peste 300 de funcții avansate pentru a crește productivitatea și a economisi timp. Faceți clic aici pentru a obține funcția de care aveți cea mai mare nevoie...
Fila Office aduce interfața cu file în Office și vă face munca mult mai ușoară
- Activați editarea și citirea cu file în Word, Excel, PowerPoint, Publisher, Access, Visio și Project.
- Deschideți și creați mai multe documente în filele noi ale aceleiași ferestre, mai degrabă decât în ferestrele noi.
- Vă crește productivitatea cu 50% și reduce sute de clicuri de mouse pentru dvs. în fiecare zi!