Hur tar jag bort rader om cellen är större / mindre än ett visst värde i Excel?

Ibland kan du behöva ta bort rader om celler i en viss kolumn är större eller mindre än ett visst värde i Excel. Denna artikel kommer att rekommendera flera metoder för att hantera detta problem.

Ta bort rader om cellen är större / mindre än ett visst värde med VBA-kod
Ta bort rader om cellen är större / mindre än ett visst värde med Kutools för Excel
Ta bort rader om cellen är större / mindre än ett visst värde med Kutoos för Excel

Ta bort rader om cellen är större / mindre än ett visst värde med VBA-kod

Antag att du vill ta bort hela rader om cell i kolumn D är större eller mindre än ett visst värde i Excel. Du kan köra följande VBA-kod för att uppnå den.

1. Tryck andra + F11 samtidigt för att öppna Microsoft Visual Basic för applikationer fönster.

2. I Microsoft Visual Basic för applikationer fönstret klickar Insert > modul. Kopiera och klistra sedan in nedanstående VBA-kod i kodfönstret.

VBA-kod: Radera rader om cellen är större / mindre än ett visst värde i 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

Anmärkningar: I ovanstående kod betyder> 30000 att du kommer att radera rader om celler är större än 30000 i en angiven kolumn. Om du vill radera rader om celler är mindre än ett visst värde, ändra tecknet> till <och ange sedan ditt värde.

3. Tryck F5 nyckel för att köra koden, när den dyker upp Kutools för Excel I dialogrutan väljer du det intervall (enstaka kolumn) som du hittar om cellerna i den här kolumnen är större eller mindre än ett visst värde. Och klicka sedan på OK knapp. Se skärmdump:

Sedan raderas alla rader med cellvärde större än 30000 i kolumn D omedelbart.

Ta bort rader om cellen är större / mindre än ett visst värde med Kutools för Excel

Smakämnen Välj specifika celler nytta av Kutools för Excel kan hjälpa dig att välja alla rader med celler som är större eller mindre än ett visst värde i en viss kolumn och sedan kan du radera alla markerade rader manuellt samtidigt.

1. Markera den kolumn du vill ta bort rader baserat på och klicka sedan på Kutools > Välja > Välj specifika celler. Se skärmdump:

2. I Välj specifika celler dialogruta, välj Hela raden i Urvalstyp sektion. I Specifik typ avsnitt, välj Större än or Mindre än från den första rullgardinsmenyn anger du det specifika värdet i nästa textruta och klickar sedan på OK knapp.

3. Sedan dyker en dialogruta upp för att berätta hur många rader som är markerade, klicka på OK knapp. Och du kan se alla rader med ett värde större än 30000 i kolumn D väljs omedelbart.

4. Högerklicka på en av de valda raderna och klicka sedan på Radera från högerklickmenyn. Och alla valda rader raderas.

Ta bort rader om cellen är större / mindre än ett visst värde med Kutoos för Excel

Förutom de två ovanstående metoderna kan du filtrera bort alla rader med celler som är större eller mindre än ett visst värde i en viss kolumn och sedan ta bort alla filtrerade rader med Ta bort dolda (synliga) rader och kolumner nytta av Kutools för Excel.

1. Markera kolumnrubriken och klicka sedan på Data > Filter. Se skärmdump:

2. Klicka på rullgardinspilen i kolumnen som du kommer att ta bort rader baserat på och klicka sedan på Antal filter > Större än or Mindre än som nedan skärmdump:

3. I Anpassat autofilter dialogrutan, ange ett visst antal efter att rutan är större än eller är mindre än och klicka sedan på OK knapp.

4. Sedan filtreras alla rader med vissa celler som är större eller mindre än ett visst värde i kolumn D. Du kan ta bort alla filtrerade rader genom att välja de filtrerade uppgifterna och klicka sedan på Kutools > Radera > Ta bort dolda (synliga) rader och kolumner. Se skärmdump:

5. I Ta bort dolda (synliga) rader och kolumner dialogrutan, se till att I valt intervall alternativet väljs i Titta in rullgardinsmenyn, välj rader i Radera typ avsnittet, ange alternativet Synliga rader i Detaljerad typ och slutligen klicka på OK knapp.

6. Sedan raderas alla synliga rader i det valda intervallet omedelbart, du kan avbryta filtret genom att klicka Data > Filter.

Relaterade artiklar:

• Hur tar jag bort alla rader under en viss rad eller aktiv cell i Excel?
• Hur tar jag bort alla rader utom den första rubrikraden i Excel?