Как создавать цветные суммы
Хотели бы вы добавить содержимое ячеек, но учитывать цвет ячеек? Вы можете сделать это с помощью макроса. На следующем рисунке показана таблица данных, в которой некоторые ячейки имеют желтый фон (желтый цвет заливки):
Чтобы добавить только те ячейки из текущего выделения, которые имеют желтый цвет фона, используйте следующий макрос:
Вложенные ячейки AddColor ()
Дим-сумма на всю длину
Тусклая ячейка как диапазон
Для каждой выделенной ячейки
Если Cell.Interior.ColorIndex = 6, то
Сумма = Сумма + Значение ячейки
Конец, если
Следующая ячейка
MsgBox "Цветовая сумма:" & sum
Конец подписки
После запуска макроса Excel показывает сумму ячеек в окне, которые выделены желтым цветом фона. На следующем рисунке показано, как будет выглядеть результат, если вы выберете диапазон ячеек, представленный выше:
Чтобы использовать другие цвета вместо ячеек с желтым фоном, настройте значение сравнения в запросе If. Замените желтый цвет на другие значения вместо 6. Чтобы узнать, какое значение ColorIndex использовать для выбранного цвета, вы можете использовать небольшой макрос. Щелкните выбранную ячейку и запустите следующий макрос, чтобы узнать, каким цветом фона отформатирована активная ячейка:
Sub ActiveColor ()
MsgBox "Активный цвет фона:" & _
(Выбор (1, 1) .Interior.ColorIndex)
Конец подписки
Совет: Если вы хотите узнать, как вводить и запускать макросы в Excel, вы найдете здесь краткое описание: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-haben-sie -makros- in-excel-ein.html
