Оптимизация или СУММЕСЛИ без формулы

[Евгений Таб]

Добрый вечер коллеги.

Подскажите пож-ста инструмент который позволит произвести суммирование по условию, в данном случае формулой СУММЕСЛИ.

Я обычно примелял вставку формулы в ячейку и протягивал до конца таблицы. Но когда я перешел на более крупные таблицы, скорость обработка данные упала.

Пока нашел одно решение ускорения работы, но на самом деле, оно также очень долго суммирует.

With Range("AH2:AH" & Cells(Rows.Count, 1).End(xlUp).Row)
.FormulaR1C1 = "=SUMIF(YUSD_SHP004!C[-33]:C[-17],RC[-33]&""_""&RC[-32],YUSD_SHP004!C[-17])"
.Value = .Value
End With
 End Sub

Можете написать пример кода который позволит быстрее обрабатывать данные. Спасибо.

[Казанский]

Может, попробовать оптимизировать формулу?

=СУММЕСЛИ(YUSD_SHP004!A:Q;A1&"_"&B1;YUSD_SHP004!Q:Q)

Вам действительно нужно искать совпадение во всем диапазоне столбцов A:Q? А Вы в курсе, что диапазоном суммирования в этом случае является диапазон Q:AG?

Аргумент «диапазон_суммирования» не обязательно должен совпадать по размеру и форме с аргументом «диапазон». При определении фактических ячеек, подлежащих суммированию, в качестве начальной ячейки используется верхняя левая ячейка аргумента «диапазон_суммирования», а затем суммируются ячейки, соответствующие по размеру и форме аргументу «диапазон».

Ну и использовать в формуле целые столбцы - нехорошо для быстродействия, ведь это заставляет Excel при расчете каждой формулы определять фактический диапазон. Определите нижнюю границу и вставьте в формулу.