Цвет определенного диапазона клеток в одном ряду - PullRequest
0 голосов
/ 23 мая 2018

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

Как видите, у меня переменное количество задачи переменную start и end для каждой задачи

Я создал простой временной ряд, в котором «Машина 1», которая находится в строке № 6, выполняет все задачи.Временной ряд находится в строке № 3.

Таким образом, в основном мне нужно раскрасить диапазоны, заданные в таблице задач в строке «Машина 1», используя этот временной ряд в качестве справочного материала, чтобы начать раскрашиватьклетки.Каждое задание должно иметь свой цвет.

Поскольку я начинающий в VBA, я пытался сделать это, используя формулу:

=IF(AND($C4<=AK$3;$D4>=AK$3);1;0)

Будучи C4 началомзадача, AK3 - место временного ряда прямо сейчас, а D4 - конец задачи.Тогда я бы заполнил весь ряд 1-й машины.Это дало бы 1 в диапазоне задачи и 0 до и после задачи, тогда я мог бы отформатировать строку и покрасить ячейку по заданному значению в каждой ячейке.(1 цвет и 0 пробел)

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

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

1 Ответ

0 голосов
/ 23 мая 2018

Если я правильно понимаю, что вы хотите, это можно сделать с помощью условного форматирования:

Используйте четыре условия, по одному для каждой из следующих формул:

=COLUMN(AK6)<=$D$7+37
=COLUMN(AK6)<=$D$6+37
=COLUMN(AK6)<=$D$5+37
=COLUMN(AK6)<=$D$4+37

и примените их вэтот заказ на $AK$6:$BZ$6

...