Як видалити рядки, якщо комірка більша / менша за певне значення в 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 може допомогти вам вибрати всі рядки з комірками, більшими або меншими за певне значення у вказаному стовпці, а потім ви можете вручну видалити всі виділені рядки одночасно.
Перед поданням заявки Kutools для Excel, будь ласка завантажте та встановіть його спочатку.
1. Виберіть стовпець, на основі якого потрібно видалити рядки, а потім натисніть Кутулс > Select > Виберіть певні клітини. Дивіться знімок екрана:
2 В Виберіть певні клітини діалогове вікно, виберіть Весь ряд в Тип вибору розділ. В Конкретний тип розділ, виберіть Більш чим or Менш з першого розкривного списку введіть певне значення в наступне текстове поле, а потім клацніть на OK кнопки.
3. Потім з'явиться діалогове вікно, щоб повідомити, скільки рядків вибрано, натисніть кнопку OK кнопку. І ви можете бачити, що всі рядки, значення яких перевищують 30000, у стовпці D вибрані негайно.
4. Клацніть правою кнопкою миші на одному з вибраних рядків, а потім клацніть видаляти з меню, що клацне правою кнопкою миші. І всі вибрані рядки видаляються.
Якщо ви хочете отримати безкоштовну пробну версію (30 днів) цієї програми, натисніть, щоб завантажити, а потім перейдіть до застосування операції, як описано вище.
Видаліть рядки, якщо комірка більше / менше певного значення за допомогою Kutoos для Excel
На додаток до вищезазначених двох методів, ви можете відфільтрувати всі рядки з клітинками, більшими або меншими за певне значення у вказаному стовпці, а потім видалити всі відфільтровані рядки за допомогою Видалити приховані (видимі) рядки та стовпці корисність Kutools для Excel.
Перед поданням заявки Kutools для Excel, будь ласка завантажте та встановіть його спочатку.
1. Виберіть заголовок стовпця, а потім натисніть дані > фільтр. Дивіться знімок екрана:
2. Клацніть стрілку спадного меню в стовпці, на основі якого ви будете видаляти рядки, а потім натисніть Кількісні фільтри > Більш чим or Менше, ніж як нижче скріншот:
3 В Спеціальний автофільтр діалогове вікно, введіть певне число після того, як поле більше або менше поля, а потім клацніть на OK кнопки.
4. Потім усі рядки з певними комірками, які є більшими або меншими за певне значення у стовпці D, фільтруються. Ви можете видалити всі відфільтровані рядки, вибравши відфільтровані дані, а потім клацніть Кутулс > видаляти > Видалити приховані (видимі) рядки та стовпці. Дивіться знімок екрана:
5 В Видалити приховані (видимі) рядки та стовпці діалогове вікно, переконайтеся, що У вибраному діапазоні опція вибрана в Заглядати у спадному списку виберіть ряди в Тип видалення у розділі, вкажіть опцію Видимі рядки Детальний тип і, нарешті, клацніть на OK кнопки.
6. Потім усі видимі рядки у вибраному діапазоні негайно видаляються, ви можете скасувати фільтр, натиснувши дані > фільтр.
Якщо ви хочете отримати безкоштовну пробну версію (30 днів) цієї програми, натисніть, щоб завантажити, а потім перейдіть до застосування операції, як описано вище.
Видаліть рядки, якщо клітинка більша/менша за певне значення за допомогою Kutools для Excel
Статті по темі:
- Як видалити всі рядки нижче певного рядка або активної комірки в Excel?
- Як видалити всі рядки, крім першого рядка заголовка в Excel?
Найкращі інструменти продуктивності офісу
Покращуйте свої навички Excel за допомогою Kutools для Excel і відчуйте ефективність, як ніколи раніше. Kutools для Excel пропонує понад 300 додаткових функцій для підвищення продуктивності та економії часу. Натисніть тут, щоб отримати функцію, яка вам найбільше потрібна...
Вкладка Office Передає інтерфейс із вкладками в Office і значно полегшує вашу роботу
- Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
- Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
- Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!
