Страницы: 1
RSS
Текст в ячейках определённого цвета (жёлтого) сделать белым
 
Всех приветствую

Поделитесь, пожалуйста, макросом, который мог бы делать такую функцию и, желательно, на автомате (выделил ячейку жёлтым - текст сразу становится белым. Чем-то похоже на функцию "найти и заменить"), хотя достаточно и разового

Заранее благодарю
 
Код
Sub macro()
    For Each cell In Selection
        If cell.Interior.Color = RGB(255, 255, 0) Then cell.Font.Color = RGB(255, 255, 255)
    Next
End Sub
Соблюдение правил форума не освобождает от модераторского произвола
 
Geineh, по моему, Excel не отслеживает изменение цвета заливки ячейки, то есть вы можете менять цвет заливки, но в VBA нет метода отслеживания этого. В VBA есть, например, метод отслеживания изменения активной ячейки (когда вы мышкой просто щёлкаете по любым ячейкам на листе), или меняете значение в ячейке (но не цвет заливки ячейки)
Изменено: New - 29.07.2021 00:28:59
 
New, buchlotnik, спасибо
Страницы: 1
Наверх