Помогите пожайлуста решить ещё 1 задачку

[alex77777]

Здравствуйте!

Помогите пожайлуста решить ещё 1 задачку.
На самом деле долго объяснять ( , поэтому я прилагаю файл.
Текст внутри файла.

Спасибо заранее.

[lord0n]

вот это вообще элементарно решается с помошью стандартной функции екселя.
значит так:
1. наводишь на первую нужную дату
2. меню формат -> условное форматирование
3. выбираешь формулу
4. в соседнее поле вставляешь текст: =ЕСЛИ(E5+31<СЕГОДНЯ();1;0)>0 (вместо Е5 нужно вставит адрес ячйки где у тебя стоит курсор)
5. нажимаешь формат и выдираешь то что тебе нужно (красный цвет шрифта и жирный). Ок, Ок
6. на панели инструментов выбираешь формат по образцу (щеточка рядом с кнопкой вставить)
7. и просто протягиваешь в низ до оканчания дат

+ можно написать макрос на 10 сторок

[alex77777]

Огромное ВАМ СПАСИБО ЗА ПОМОЩЬ.
Меня всё устраивает, а можно как то сделать чтобы вместо
слов ЛОЖЬ ИСТИНА выдавала например: ОК ?

[lord0n]

вместо стова ИСТИНА прописываешь ОК

[alex77777]

спасибо всё разобрался. Немножко не так конечно ну да ладно
ещё раз Вам большое спасибо .

[lord0n]

кстати если хочешь могу выложить твой файл но с изменениями как ты хотел в самом начале

[alex77777]

да было не плохо.

[lord0n]

да было не плохо.

держи, я ту да еще мекрос всунул, как что не пугайся

[RayShade]

....когда он спросит номер твоей кредитки, смело его вводи

[lord0n]

да ладно мне ж не сложно помочь человеку
к томуже у меня нет кредитки