Прописывание имени столбца в зависимости от цвета ячейки - VBA
Формулировка задачи:
Привет все. Интересует как сделать так, чтобы прописывалось автоматически имя столбца в котором присутствует цветная ячейка в столбец B. Вообще это реально?
Решение задачи: «Прописывание имени столбца в зависимости от цвета ячейки»
textual
Листинг программы
- Function Ma(hdr As Range, rng As Range) As String
- Dim h(), c As Range, i&
- Application.Volatile
- h = hdr.Value
- For Each c In rng
- i = i + 1
- If c.Interior.ColorIndex <> xlColorIndexNone Then Ma = Ma & vbLf & h(1, i)
- Next
- Ma = Mid$(Ma, 2)
- End Function
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
