Страницы: 1
RSS
Подсчитать количество пустых ячеек между непустыми
 
Есть столбец, в котором ячейка заполняется примерно раз в неделю.
Надо подсчитать количество дней между событием, т.е. количество пустых ячеек между значимыми, чтобы построить график.
(Вручную - сложно, таких позиций на складе более 300.)
Может, в примере более понятно.
 
Цитата
sam63 написал: Есть... Надо...
Обычно так подчинённым задания дают...
 
sam63, макрос
Код
Sub sam63()
Dim i&, c As Range, p&
  Set c = Columns(1).SpecialCells(xlCellTypeConstants)
  ReDim v(1 To c.Count, 1 To 1)
  For Each c In c
    i = i + 1
    v(i, 1) = c.Row - p
    p = c.Row
  Next
  Cells(1, 3).Resize(i).Value = v
End Sub
Изменено: Казанский - 24.12.2015 23:33:43
 
Первое значение вписать вручную, для второй строки и ниже формула массива:
=СУММ(НАИМЕНЬШИЙ(ЕСЛИ($A$1:$A$100;СТРОКА($A$1:$A$100));СТРОКА(A1)+{1;0})*{1;-1})

Второй вариант - немассивная с доп. столбцом.
 
Казанский, vikttur спасибо за помощь.
Не ожидал, что ответ придёт так быстро.
Ещё раз большое спасибо!
 
=СЧИТАТЬПУСТОТЫ()
«Всё гениальное просто» перефразировка афоризма Леонардо да Винчи
 
Demonik, внимательнее - пустые МЕЖДУ заполненными.
Страницы: 1
Читают тему
Наверх