Добавить текст ячейки в зависимости от цвета ячейки - VBA

Формулировка задачи:

Здравствуйте. Я не могу разобраться в написании формулы или макроса. В определенном диапазоне ячеек требуется: в зависимости от цвета ячейки добавить текст с названием цвета в ячейку справа. Количество цветов ячеек ограниченно. То есть, если ячейка желтого цвета, то в ячейке справа должен появиться текст "желтый", если красного -"красный". Нужен код для VBA excel. HELP ME!!!

Решение задачи: «Добавить текст ячейки в зависимости от цвета ячейки»

textual
                            Листинг программы 
                        
Public Function examV1(DataRange As Range) As String
 
     If DataRange.Interior.Color = Range("D9").Interior.Color Then examV1 = "Г¦ГҐГ«ГІГ»Г©"
     If DataRange.Interior.Color = Range("D10").Interior.Color Then examV1 = "ГЄГ°Г*Г±Г*Г»Г©"
     
 End Function

Оцени полезность:

5 голосов , оценка 4.2 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Похожие ответы