Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 15.04.2013, 15:35   #1
AlexG1981
Новичок
Джуниор
 
Регистрация: 05.02.2013
Сообщений: 2
По умолчанию Условие внесения изменений по дате

Добрый день, уважаемые форумчане.
Возникла следующая проблема:
необходимо прописать условие непозволяющее внести данные на лист, если изменения вносятся позже чем за три дня (например сегодня 15,04,2013, надо чтобы при внесении на 18,04,2013 выскакивала ошибка, а на 19,04,2013 всё нормально работало).
В коде использую: NOW + 3
В рамках текущего месяца работает, но при попытке внесения на 01,05,2013 выскакивает ошибка.
Как я понимаю, он (код) проверяет только число и не учитывает месяц.
Помогите пожалуйста правильно прописать данное условие.
Файл прилагается.
Спасибо!
Вложения
Тип файла: zip Project.zip (68.7 Кб, 8 просмотров)
AlexG1981 вне форума Ответить с цитированием
Старый 15.04.2013, 15:56   #2
slan
Форумчанин
 
Аватар для slan
 
Регистрация: 30.01.2008
Сообщений: 314
По умолчанию

сравнивать лучше не строки , а числа:

If CDate(DataChange) < (Now + 3) Then
slan вне форума Ответить с цитированием
Старый 15.04.2013, 16:20   #3
AlexG1981
Новичок
Джуниор
 
Регистрация: 05.02.2013
Сообщений: 2
По умолчанию

Цитата:
Сообщение от slan Посмотреть сообщение
сравнивать лучше не строки , а числа:

If CDate(DataChange) < (Now + 3) Then
До этого не додумался....
Работает!
Спасибо!
AlexG1981 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
веб-програмист для внесения дополнений и изменений в код сайта veleri Фриланс 0 25.03.2013 01:49
Время внесения изменения в ячейке and150382 Microsoft Office Excel 8 15.02.2013 16:51
SQL запрос внесения картинки в базу Darcangel БД в Delphi 5 11.01.2012 09:23
Защита текста от внесения в него изменений Роберт Андреевич Microsoft Office Word 3 24.04.2011 01:04
Отслеживание изменений(по времени и дате) Ксеноцид Общие вопросы Delphi 6 01.04.2008 10:59