Консультация № 90105
05.06.2007, 12:42
0.00 руб.
0 2 2
Приветствую вас, уважаемые эксперты. Не могу решить одну проблему:
программа Excel. Необходимо, что бы либо сама ячейка, либо цвет шрифта в ячейке менялся на заданный при наступлении определенной даты. Как это сделать? Заранее спасибо.

Обсуждение

Неизвестный
05.06.2007, 19:00
общий
это ответ
Здравствуйте, Zherdev Vitaliy Petrovich!
Извините пожалуйста за прошлый ответ, все напутал. Я сам в VBA начинающий. Такая штука как запись макросов очень помагает. Вот код, смотрите в приложении. Всего доброго.

Приложение:
Sub menalka() If Date = "12.05.2007" Then ‘Подставляем значение даты Range("D4").Select ‘ Вместо D4 - подставляем нужную ячейку Selection.Font.ColorIndex = 3 ‘Выставляем цвет шрифта Selection.Interior.ColorIndex = 45 ‘Выставляем цвет ячейки End If End Sub
Неизвестный
05.06.2007, 20:05
общий
это ответ
Здравствуйте, Zherdev Vitaliy Petrovich!
Для этого можно обойтись и без программирования.
В нужной ячейки примените условное форматирование (меню [Формат]-[Условное форматирование], а в качестве условия примените формулу =СЕГОДНЯ()=ДАТА(год;месяц;день), где год, месяц, день - соответственно числа. (например =СЕГОДНЯ()=ДАТА(2007;6;5))
И не забудьте настроить необходимый формат ячейки (отображение ячейки при выполнении условия)
Форма ответа