Як видалити рядки з відсутніми / порожніми значеннями в певних стовпцях Excel?
У деяких випадках може знадобитися видалити цілі рядки з відсутнім значенням або порожню комірку в діапазоні комірок у Excel. Ця стаття покаже вам, як боротися з цією проблемою.
Видаліть рядки з відсутніми / порожніми значеннями в певних стовпцях із кодом VBA
Видаліть рядки з відсутніми / порожніми значеннями в певних стовпцях із кодом VBA
Припустимо, ви хочете видалити рядки, якщо відсутні значення у стовпцях B та D, як показано на знімку екрана нижче. Ви можете запустити такий код VBA для його досягнення.
1. прес інший + F11 відкрити Microsoft Visual Basic для додатків вікна.
2 В Microsoft Visual Basic для додатків вікна, натисніть Insert > Модулі. Потім скопіюйте та вставте наведений нижче код VBA у вікно коду.
Код VBA: Видаліть рядки із відсутніми / порожніми значеннями в певних стовпцях
Sub DeleteRows()
Dim I As Integer
Dim xCount As Integer
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 Then
MsgBox "You can’t select multiple ranges to operate", vbInformation, "Kutools for Excel"
Exit Sub
End If
xCount = xRg.Rows.Count
For I = xCount To 1 Step -1
If Application.WorksheetFunction.CountBlank(xRg.Rows(I)) > 0 Then
xRg.Rows(I).EntireRow.Delete
End If
Next
End Sub
3. прес F5 клавіша для запуску коду. Тоді a Kutools для Excel з'явиться діалогове вікно, виберіть діапазон стовпців, який потрібно перевірити, чи існує відсутні значення, а потім клацніть на OK кнопки.
Після натискання OK кнопка, ви можете бачити, що всі рядки з відсутніми значеннями в стовпцях B і D видаляються негайно. Дивіться знімок екрана:
примітки: Ви не можете вибрати кілька діапазонів для роботи одночасно. Якщо відсутнє значення існує в декількох стовпцях, і ви хочете видалити всі рядки, ви можете повторити наведений вище крок 3 з одного стовпця в інший.
Легко заповнюйте всі порожні клітинки певним значенням у Excel
Команда Заповніть порожні клітинки корисність Kutools для Excel допоможе вам легко обробляти порожні комірки в Excel. Наприклад, ви можете заповнити всі порожні комірки у вибраному діапазоні фіксованим значенням, заповнити порожні комірки на основі значення вгорі, вниз, ліворуч або праворуч, або ви можете заповнити порожні комірки лінійними значеннями. Дивіться знімок екрана:
Завантажте та спробуйте зараз! (30 днів безкоштовно)
Статті по темі:
- Як видалити рядки, якщо комірка більша / менша за певне значення в Excel?
- Як видалити всі рядки, крім першого рядка заголовка в Excel?
- Як видалити всі рядки нижче певного рядка або активної комірки в Excel?
Найкращі інструменти продуктивності офісу
Покращуйте свої навички Excel за допомогою Kutools для Excel і відчуйте ефективність, як ніколи раніше. Kutools для Excel пропонує понад 300 додаткових функцій для підвищення продуктивності та економії часу. Натисніть тут, щоб отримати функцію, яка вам найбільше потрібна...
Вкладка Office Передає інтерфейс із вкладками в Office і значно полегшує вашу роботу
- Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
- Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
- Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!