Сообщество Чайников

Вопрос

Как в Еxcele сделать промежуточные итоги не по значению ячейки, а по определенной формуле: допустим, если значение ячейки попадает в определенный интервал.

Ответ

Я бы завел дополнительную таблицу, определяющую промежутки/границы интервалов, и добавил еще один столбец в исходную таблицу, где прописал бы формулой поиск по таблице интревалов (типа, Vlookup), тогда «Промежуточные итоги» надо настроить относительно значений этого дополнительного столбца. Или прописал бы в этом столбце нужные формулы. Если же мне не нужно было бы показывать этот столбец, я бы сделал его шириной 0.1 (не Hide), чтобы столбца не было видно глазом, но подписи к промежуточным итогам появлялись бы.
Или нужно писать программу, если «игра стоит свеч».

Evgeny Agafonov

Макрос
'в [b1] — сума чисел попадающих диапазон 30<х<180
'для проверки в столбец "А" набрать ряд чисел от 0 до 200
усл1 = ">30" '
усл2 = "<180"

Columns("A:A").Select
Selection.AutoFilter
Selection.AutoFilter Field:=1, Criteria1:=усл1, Operator:=xlAnd, _
Criteria2:="усл2"
[b1] = Application.Sum(Selection)
Selection.AutoFilter

dedtolya