Код VBA, где ячейка листа 1 соответствует цвету фона ячейки листа 2, а значение ячейки не имеет значения

Question

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

Часть 1:

Я настроил условное форматирование в нескольких ячейках между листами 2-10, чтобы менять цвета по мере приближения к дате исполнения.Через 7 дней он меняет цвет на зеленый, 3 дня - на оранжевый, а день - на красный и остается красным, пока я не уйду и не переместлю дату дальше.

Я хотел бы, чтобы ячейка (я) на листе 1 отражала изменения цвета ячеек или групп ячеек на другом листе, несмотря на то, какое значение в ячейке.Пример: ячейки двух листов N16 и N17 имеют сроки исполнения 15.01.19 и будут менять цвета, как указано выше.Я хотел бы, чтобы ячейка A5 на листе 1 следовала за изменениями цвета N16 и N17 на листе два.

Answer 1

Я предполагаю, что вы знакомы с созданием модуля и макроса, если это так, вставьте кнопку с этим макросом или поместите ее под рабочую таблицу, активируйте:

IF THISWORKBOOK.SHEETS("sheet1").range("N16").Cell.Interior.Color = RGB(255,0,0)
THEN
THISWORKBOOK.SHEETS("sheet2").range("a5").Cell.Interior.Color = RGB(255,0,0)