Как Считать Ячейки по Цвету в Excel: 4 Формулы VBA | Свои формулы для Excel
Excel не умеет видеть цвет ячейки? А считать раскрашенные таблицы вручную — сомнительное удовольствие, особенно если строк пятьсот или больше. В этом видео показываю, как за 3 минуты создать собственную надстройку для Excel и добавить в него 4 новые формулы: ISRED, ISYELLOW, ISGREEN и ISBLUE. С их помощью Excel сможет определять цвет ячейки и возвращать ИСТИНА или ЛОЖЬ. Дальше эти формулы можно использовать для подсчёта, фильтрации, проверки статусов и автоматизации таблиц. Что будет в видео: — почему обычные формулы Excel не видят цвет ячейки; — как открыть редактор VBA; — как создать модуль и вставить код; — как работают функции ISRED, ISYELLOW, ISGREEN и ISBLUE; — как сохранить код как надстройку Excel; — как включить надстройку, чтобы формулы работали во всех книгах; — практический пример: подсчёт просроченных задач по красному цвету; — что делать, если у вас нестандартный оттенок. Код из видео для копирования: Function ISRED(cell As Range) As Boolean ISRED = (cell.Interior.Color = RGB(255, 0, 0)) End Function Function ISYELLOW(cell As Range) As Boolean ISYELLOW = (cell.Interior.Color = RGB(255, 255, 0)) End Function Function ISGREEN(cell As Range) As Boolean ISGREEN = (cell.Interior.Color = RGB(0, 176, 80)) End Function Function ISBLUE(cell As Range) As Boolean ISBLUE = (cell.Interior.Color = RGB(0, 112, 192)) End Function Краткая инструкция: 1. Нажмите Alt + F11. 2. В редакторе VBA выберите Insert → Module. 3. Вставьте код. 4. Закройте редактор и проверьте формулу, например: =ISRED(A1) 5. Файл → Сохранить как → тип файла: Надстройка Excel (*.xlam) 6. Файл → Параметры → Надстройки → Надстройки Excel → Перейти. 7. Поставьте галочку напротив вашей надстройки и нажмите ОК. После этого формулы ISRED, ISYELLOW, ISGREEN и ISBLUE будут доступны во всех книгах Excel. Важно: Excel не считает изменение цвета ячейки изменением данных. Поэтому после смены цвета формула не пересчитается автоматически. Нажмите Ctrl + Alt + F9, чтобы обновить вычисления. Если вы используете нестандартный оттенок, узнайте его RGB-код: Правый клик по ячейке → Формат ячеек → Заливка → Другие цвета → вкладка «Особые». Затем подставьте нужные значения R, G и B в код. Если видео было полезным — ставьте лайк, подписывайтесь на канал и включайте уведомления. #Excel #VBA #ФормулыExcel #НадстройкаExcel #ExcelДляРаботы #АвтоматизацияExcel #ExcelТаблицы #MicrosoftExcel #ОбучениеExcel #ExcelСоветы
Excel не умеет видеть цвет ячейки? А считать раскрашенные таблицы вручную — сомнительное удовольствие, особенно если строк пятьсот или больше. В этом видео показываю, как за 3 минуты создать собственную надстройку для Excel и добавить в него 4 новые формулы: ISRED, ISYELLOW, ISGREEN и ISBLUE. С их помощью Excel сможет определять цвет ячейки и возвращать ИСТИНА или ЛОЖЬ. Дальше эти формулы можно использовать для подсчёта, фильтрации, проверки статусов и автоматизации таблиц. Что будет в видео: — почему обычные формулы Excel не видят цвет ячейки; — как открыть редактор VBA; — как создать модуль и вставить код; — как работают функции ISRED, ISYELLOW, ISGREEN и ISBLUE; — как сохранить код как надстройку Excel; — как включить надстройку, чтобы формулы работали во всех книгах; — практический пример: подсчёт просроченных задач по красному цвету; — что делать, если у вас нестандартный оттенок. Код из видео для копирования: Function ISRED(cell As Range) As Boolean ISRED = (cell.Interior.Color = RGB(255, 0, 0)) End Function Function ISYELLOW(cell As Range) As Boolean ISYELLOW = (cell.Interior.Color = RGB(255, 255, 0)) End Function Function ISGREEN(cell As Range) As Boolean ISGREEN = (cell.Interior.Color = RGB(0, 176, 80)) End Function Function ISBLUE(cell As Range) As Boolean ISBLUE = (cell.Interior.Color = RGB(0, 112, 192)) End Function Краткая инструкция: 1. Нажмите Alt + F11. 2. В редакторе VBA выберите Insert → Module. 3. Вставьте код. 4. Закройте редактор и проверьте формулу, например: =ISRED(A1) 5. Файл → Сохранить как → тип файла: Надстройка Excel (*.xlam) 6. Файл → Параметры → Надстройки → Надстройки Excel → Перейти. 7. Поставьте галочку напротив вашей надстройки и нажмите ОК. После этого формулы ISRED, ISYELLOW, ISGREEN и ISBLUE будут доступны во всех книгах Excel. Важно: Excel не считает изменение цвета ячейки изменением данных. Поэтому после смены цвета формула не пересчитается автоматически. Нажмите Ctrl + Alt + F9, чтобы обновить вычисления. Если вы используете нестандартный оттенок, узнайте его RGB-код: Правый клик по ячейке → Формат ячеек → Заливка → Другие цвета → вкладка «Особые». Затем подставьте нужные значения R, G и B в код. Если видео было полезным — ставьте лайк, подписывайтесь на канал и включайте уведомления. #Excel #VBA #ФормулыExcel #НадстройкаExcel #ExcelДляРаботы #АвтоматизацияExcel #ExcelТаблицы #MicrosoftExcel #ОбучениеExcel #ExcelСоветы