Страницы: 1
RSS
Подсчет пустых ячеек в столбце, При условии заполнения соседней ячейки
 
Добрый день!
Помогите разобраться: как подсчитать количество пустых ячеек в столбце, при заполненной рядом ячейке?

Заполняем данные в таблице. Подсчет пустых ячеек нужен по столбцу Е. В H1 нужно записать количество пустых ячеек в столбце E.
Если использую ЕПУСТО, то считает все ячейки в расчерченной таблице...
Как подсчитать пустые в Е, при заполненной соседней ячейке в столбце D?

Пример во вложении.
 
=СУММПРОИЗВ((D2:D127<>"")*(E2:E127=""))
Если в мире всё бессмысленно, — сказала Алиса, — что мешает выдумать какой-нибудь смысл? ©Льюис Кэрролл
 
Код
Sub Kol_voEmpty()
Dim i As Long
Dim iLastRow As Long
Dim Kol_vo As Integer
 iLastRow = Cells(Rows.Count, 1).End(xlUp).Row
  Kol_vo = 0
  For i = 2 To iLastRow
    If Not IsEmpty(Cells(i, "D")) Then
      If IsEmpty(Cells(i, "E")) Then Kol_vo = Kol_vo + 1
    End If
  Next
    Range("H1") = Kol_vo
End Sub
 
Максим В.,спасибо огромное! Все оказалось намного проще...
 
Или так:
Код
=СЧЁТЕСЛИМН(D:D;"<>"&"";E:E;"")
Нет ничего сложнее поиска простого решения.
 
Kuzmich, Jykermann, спасибо!
Страницы: 1
Наверх