Удалите строку (столбец от A до K), если ячейка пуста в столбце D (или отфильтруйте и удалите все (пробелы)

#excel #vba

Вопрос:

Ищу здесь некоторую помощь, так как большинство ответов удаляют всю строку. Заранее спасибо!

Вот как выглядит моя таблица, я хочу удалить строку (но только из столбца A в K, а не всю строку), если в столбце D. ячейка пуста.

Данные динамичны, будут меняться каждый раз, но в ячейке D. в них всегда должен быть пробел. Если нет, ищите код, чтобы просто продолжить.

Поэтому выделенный D3 пуст, я хочу, чтобы он удалил A3 до K3.
введите описание изображения здесь .

.

Вы могли бы отфильтровать ячейку D2 для (пробелов), чтобы они все были-имейте в виду, что, скорее всего, в столбце B будет пустая ячейка, но я, по сути, хочу удалить все эти отфильтрованные данные. введите описание изображения здесь

Ответ №1:

Is — это столбец K или столбец F. Что-то вроде этого, может быть. Просто переоденьтесь в соответствии с вашими потребностями.

 Option Explicit

Sub BlankRowDeletion()

'Declaring variables
Dim LastRow As Long
Dim Rng As Range

'Getting row number of last cell
LastRow = Range("A3").SpecialCells(xlCellTypeLastCell).Row

'Selecting all data
Set Rng = Range("A3:K" amp; LastRow)

'Selecting Blank cells
Rng.SpecialCells(xlCellTypeBlanks).Select

'Deleting complete row
Selection.EntireRow.Delete

Range("A3").Select

End Sub