Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 09.04.2019, 14:40   #1
Елена195
Пользователь
 
Регистрация: 21.01.2019
Сообщений: 27
По умолчанию Макрос по цветам

Добрый день!

Есть файл в котором подрядчик цветами обозначает версии и распределяет их по месяцу.
Цель с помощью макроса в аналогичную таблицу справа вместо заливки ячейки. прописать название версии.

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

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

Заранее спасибо)
Вложения
Тип файла: xlsx пример2.xlsx (26.5 Кб, 11 просмотров)
Елена195 вне форума Ответить с цитированием
Старый 09.04.2019, 16:18   #2
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,238
По умолчанию

Скажите, а это реальная задача или плод чьего-то больного воображения?!

решить можно.
по сути, всё, что Вам нужно, содержится в объекте
Range.Interior
для этих хитрых ячеек .Interior.Color = 0
.Interior.Pattern содержит тип заливки (4000 или 4001)
см. https://docs.microsoft.com/ru-ru/dot...view=excel-pia

в зависимости от типа заливки различные данные в
.Interior.Gradient
Serge_Bliznykov вне форума Ответить с цитированием
Старый 09.04.2019, 17:43   #3
Елена195
Пользователь
 
Регистрация: 21.01.2019
Сообщений: 27
По умолчанию

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

Спасибо за помощь, пойду разбираться)
Елена195 вне форума Ответить с цитированием
Старый 09.04.2019, 17:53   #4
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,238
По умолчанию

Цитата:
Сообщение от Елена195 Посмотреть сообщение
К сожалению задача реальная, нам раз в месяц присылают такие файлы и мы сидим и плачем над этим взрывом радуги...
сочувствую.
и желаю успеха. Задача точно может быть решена.

p.s. т.е. вы эту "радугу" преобразуете в текст.
вот так?
ex2.png
Serge_Bliznykov вне форума Ответить с цитированием
Старый 09.04.2019, 17:54   #5
Елена195
Пользователь
 
Регистрация: 21.01.2019
Сообщений: 27
По умолчанию

Да, преобразуем в текст именно так)
Елена195 вне форума Ответить с цитированием
Старый 09.04.2019, 18:10   #6
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,238
По умолчанию

Цитата:
Сообщение от Елена195 Посмотреть сообщение
Да, преобразуем в текст именно так)
понятно
Serge_Bliznykov вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Макрос постоянно обрабатывает события. При открытии другой книги макрос обрывается. Ples Microsoft Office Excel 8 17.12.2016 18:15
Разобрать изображение по цветам. AdOS Общие вопросы Delphi 0 02.06.2012 21:45
Сортировка по цветам Abdukhafiz Microsoft Office Excel 1 11.03.2012 16:03
Кликание мышки по цветам xRamzeSx Общие вопросы Delphi 9 01.01.2011 12:27
Макрос вставки файлов в листы-Необходимо изменить ниже приведённый макрос as-is Microsoft Office Excel 4 25.02.2010 07:51