Страницы: 1
RSS
Код цвета CMYK
 
Добрый день подскажите как решить задачу по разбивке определенного цвета в ячейке на составляющие по системе CMYK.  
1. Копировать цвет (цвет который надо разложить на составляющие CMYK)  в определенную ячейку.  
2. В табличке из 4-х ячеек (голубой, пурпурный,желтый, черный)появляются значения соответствующих составляющих.  
Спасибо...
 
Т.е. Excel должен определить, что данный цвет, состоит из Cyan - 10%, Magenta - 50%, Yellow - 30% и blacK - 10%, так?
"..Сладку ягоду рвали вместе, горьку ягоду я одна."
 
А не проще это в фотошопе определить?
"..Сладку ягоду рвали вместе, горьку ягоду я одна."
 
В других программах я определяю с легкостью.... нужнен макрос в ecxel.... или код VB... программное обеспечение моего девайса в VB...
 
Что за девайс?  
Могу дать такую наводку:  
http://fiji.sc/wiki/index.php/RGB_to_CMYK
 
Использую в своей деятельности краски различных тонов и оттенков...  
Мешаю сам (по системе CMYK).Надоело самому из шприцов по капелькам капать...  
4 привода на 4 шприца накинул....все это черз LPT макросик простенький....  
Вот последнюю точку в автоматизации ни как поставить не могу...Вручную 4 составляющих цвета ну не хочу заносить....  
Вот такая проблема....
 
Наводочку посмотрел, т.е. осуществить цвета разложение на составляющие CMYK через RGB ? но сначала тогда на до цвет разложить на RGB, а как это программно сделать?
 
Это потрясающе!  
Вы столько всего придумали и реализовали!  
 
Обязательно постараюсь помочь Вам. К сожалению, я очень занят, может, урву время вечером или в выходные.  
 
Не до конца понял, что значит "Копировать цвет ... в определенную ячейку."  
Как это?
 
"но сначала тогда на до цвет разложить на RGB, а как это программно сделать?"  
 
Смогу ответить только после того, как пойму, что значит:  
"Копировать цвет ... в определенную ячейку."
 
Ну мож не так выразился.... не копировать,  
Ячейка залита определенным цветом (цвет который мненадо намешать)
 
Вроде в голове алгоритм выстроился...  
Нужно только требуемый цвет (цвет ячейки) разложить по RGB на три составляющие (в три ячейки) и думаю сам докумекаю дальше...
 
Ага! Значит, заливку будем раскладывать.  
 
А заливку ячейки на глаз будете выбирать?  
функции Win API можно использовать?
 
Заливка ячейки произойдет автоматически....(ряд критериев используется...)  
Надо только разложить залитую ячейку
 
А вот это не близко?  
 
Color = RGB(10, 10, 20)
 
Ладно, не буду тянуть.  
Думаю, Вы быстрее разберетесь, что к чему и адаптируете под свою задачу, чем я освобожусь.
 
Для использования перетащите пипетку на интересующий Вас объект (не обязательно в Excel). Не слишком удобно, но пока так (Делал Andy Pope, по-моему)  
 
Это несколько не то, что Вам нужно, но тоже ничего.
 
Эт немного не то...  
 
Надо вот залитую ячейку вот так разложить  
Color = RGB(10, 10, 20)  
 
А как.....
 
Перетащите пипетку на ячейку
 
"Пипеткой" - крах автоматизации!!!  
 
 
 
Вот залить ячейку цветом в формате RGB вот так (работает!)  
Cells(20, 20).Interior.Color = RGB(10, 10, 20)  
 
А КАК СЧИТАТЬ?????????
 
"крах автоматизации!!!"  
Это понятно!  
Разберитесь, как раскладывается цвет по rgb в макросах этой книги.  
Или ждите, пока я под Вас заточу
 
Не, не хватает знаний в программировании....  
Даже чет логику ухватить не могу...
 
/
 
Наваял для Вас UDF-ку.  
Ужасно корявую, может, кто-нибудь из мэтров подправит.  
 
Раскладывает цвет заливки ячейки в CMYK.  
По формулам из этой статьи:  
http://www.codeproject.com/Articles/4488/XCmyk-CMYK-to-RGB-Calculator-with-source-code  
 
т.е.    
   Black   = minimum(1-Red,1-Green,1-Blue)  
   Cyan    = (1-Red-Black)/(1-Black)  
   Magenta = (1-Green-Black)/(1-Black)  
   Yellow  = (1-Blue-Black)/(1-Black)    
RGB values have been normalized - i.e., that they are between 0 and 1.0  
 
Ф-я от двух параметров - ячейки, и компонента, который хотите получить.    
 
Проверяйте, я в цветах ничего не смыслю.
 
to: RAN  
Полезная ссылка, спасибо!  
 
Хотел было переписать без индусятины, но не нравится округление.
Страницы: 1
Читают тему
Наверх