2012-09-15 03:05:46 +0000 2012-09-15 03:05:46 +0000
24
24

Эксель: Удалить строку, если ячейка в определенном столбце пустая?

Я полный новичок в Excel, так что, пожалуйста, извините меня, если это что-то легко сделать. Я просмотрел много вариантов, но не смог найти то, что мне нужно.

В основном, я хочу удалить все строки, которые не содержат значения в столбце C. Как мне это сделать?

Я делаю это вручную прямо сейчас для 5000+ продуктов, и это сводит меня с ума.

Ответы (4)

34
34
34
2012-09-15 06:08:10 +0000

Вы можете сделать это очень быстро, если ячейки действительно пустые, используя SpecialCells

Ручной

  • Выберите столбец C
  • Нажмите F5, затем Special
  • Проверьте Blanks, затем OK (см. этот шаг на рисунке внизу)
  • Удалите строки, которые теперь выбраны (e. g. щелкните правой кнопкой мыши в выборе > Delete cells… > Entire row или через ленту (см. второй скриншот))

VBA

Sub QuickCull()
    On Error Resume Next
    Columns("C").SpecialCells(xlBlanks).EntireRow.Delete
End Sub

9
9
9
2012-09-15 03:41:57 +0000
0
0
0
2016-02-19 16:18:47 +0000

Это должно сработать.

Columns("C:C").Select
Set rngRange = Selection.CurrentRegion
lngNumRows = rngRange.Rows.Count
lngFirstRow = rngRange.Row
lngLastRow = lngFirstRow + lngNumRows - 1
lngCompareColumn = ActiveCell.Column
For lngCurrentRow = lngLastRow To lngFirstRow Step -1
If (Cells(lngCurrentRow, lngCompareColumn).Text = "") Then _
Rows(lngCurrentRow).Delete
Next lngCurrentRow
-1
-1
-1
2015-03-22 11:48:37 +0000

Y

Похожие вопросы

6
13
9
10
5