Як видалити рядки, якщо комірка більша / менша за певне значення в Excel?

Іноді може знадобитися видалити рядки, якщо клітинки у вказаному стовпці більше або менше певного значення в Excel. У цій статті буде рекомендовано кілька методів вирішення цієї проблеми.

Видаліть рядки, якщо комірка більше / менше певного значення за допомогою коду VBA
Видаліть рядки, якщо клітинка більша/менша за певне значення за допомогою Kutools для Excel
Видаліть рядки, якщо комірка більше / менше певного значення за допомогою Kutoos для Excel

Видаліть рядки, якщо комірка більше / менше певного значення за допомогою коду VBA

Припустимо, ви хочете видалити цілі рядки, якщо комірка в стовпці D більша або менша за певне значення в Excel. Ви можете запустити такий код VBA для його досягнення.

1. прес інший + F11 клавіші одночасно, щоб відкрити Microsoft Visual Basic для додатків вікна.

2 В Microsoft Visual Basic для додатків вікна, натисніть Insert > Модулі. Потім скопіюйте та вставте наведений нижче код VBA у вікно коду.

Код VBA: Видаліть рядки, якщо комірка більша / менша за певне значення в 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

примітки: У наведеному вище коді> 30000 означає, що ви видалите рядки, якщо клітинки перевищують 30000 у вказаному стовпці. Якщо ви хочете видалити рядки, якщо клітинки менше певного значення, змініть знак> на <і вкажіть своє значення.

3. прес F5 клавіша для запуску коду в спливаючому вікні Kutools для Excel діалоговому вікні, виберіть діапазон (одиночний стовпець), який ви знайдете, якщо клітинки цього стовпця більші або менші за певне значення. А потім натисніть OK кнопку. Дивіться знімок екрана:

Потім усі рядки із значенням комірки більше 30000 у стовпці D негайно видаляються.

Видаліть рядки, якщо клітинка більша/менша за певне значення за допомогою Kutools для Excel

Команда Виберіть певні клітини корисність Kutools для Excel може допомогти вам вибрати всі рядки з комірками, більшими або меншими за певне значення у вказаному стовпці, а потім ви можете вручну видалити всі виділені рядки одночасно.

1. Виберіть стовпець, на основі якого потрібно видалити рядки, а потім натисніть Кутулс > Select > Виберіть певні клітини. Дивіться знімок екрана:

2 В Виберіть певні клітини діалогове вікно, виберіть Весь ряд в Тип вибору розділ. В Конкретний тип розділ, виберіть Більш чим or Менш з першого розкривного списку введіть певне значення в наступне текстове поле, а потім клацніть на OK кнопки.

3. Потім з'явиться діалогове вікно, щоб повідомити, скільки рядків вибрано, натисніть кнопку OK кнопку. І ви можете бачити, що всі рядки, значення яких перевищують 30000, у стовпці D вибрані негайно.

4. Клацніть правою кнопкою миші на одному з вибраних рядків, а потім клацніть видаляти з меню, що клацне правою кнопкою миші. І всі вибрані рядки видаляються.

Видаліть рядки, якщо комірка більше / менше певного значення за допомогою Kutoos для Excel

На додаток до вищезазначених двох методів, ви можете відфільтрувати всі рядки з клітинками, більшими або меншими за певне значення у вказаному стовпці, а потім видалити всі відфільтровані рядки за допомогою Видалити приховані (видимі) рядки та стовпці корисність Kutools для Excel.

1. Виберіть заголовок стовпця, а потім натисніть дані > Фільтр. Дивіться знімок екрана:

2. Клацніть стрілку спадного меню в стовпці, на основі якого ви будете видаляти рядки, а потім натисніть Кількісні фільтри > Більш чим or Менше, ніж як нижче скріншот:

3 В Спеціальний автофільтр діалогове вікно, введіть певне число після того, як поле більше або менше поля, а потім клацніть на OK кнопки.

4. Потім усі рядки з певними комірками, які є більшими або меншими за певне значення у стовпці D, фільтруються. Ви можете видалити всі відфільтровані рядки, вибравши відфільтровані дані, а потім клацніть Кутулс > видаляти > Видалити приховані (видимі) рядки та стовпці. Дивіться знімок екрана:

5 В Видалити приховані (видимі) рядки та стовпці діалогове вікно, переконайтеся, що У вибраному діапазоні опція вибрана в Заглядати у спадному списку виберіть ряди в Тип видалення у розділі, вкажіть опцію Видимі рядки Детальний тип і, нарешті, клацніть на OK кнопки.

6. Потім усі видимі рядки у вибраному діапазоні негайно видаляються, ви можете скасувати фільтр, натиснувши дані > Фільтр.

Видаліть рядки, якщо клітинка більша/менша за певне значення за допомогою Kutools для Excel

Статті по темі:

• Як видалити всі рядки нижче певного рядка або активної комірки в Excel?
• Як видалити всі рядки, крім першого рядка заголовка в Excel?