Как суммировать ячейки по цвету фона в Office Excel

Краткое видео, показывающее, как суммировать ячейки на основе цвета фона.

Макрос-код:

Функция SumByColor(CellColor как диапазон, rRange как диапазон)
'Dim cSum как долго
Dim ColIndex как целое число
ColIndex CellColor.Interior.ColorIndex
Для каждого cl в диапазоне
Если cl.Interior.ColorIndex ColIndex Тогда
cSum WorksheetFunction.Sum(cl, cSum)
Конец, если
Следующий кл
Сумма по цвету cSum
Конечная функция

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