Страницы: 1
RSS
Получение дат из длинного формата даты
 
Здравствуйте!
Есть таблица, в которой содержатся результаты активностей пользователя. У каждой такой активности есть дата завершения, она идёт в формате дд.мм.гггг  чч:мм:сс. Например, 27.12.2017  17:27:48.
Мне нужно взять дату завершения одной активности и посчитать все другие, которые были после этой даты.
Присвоение формата дат не срабатывает, и макрос выдаёт некорректные значения.
То есть, пробовал задавать формат As Date для сравниваемого числа, пробовал дополнительно прописывать в условии примерно такое
Код
Dim sdate as Date
sDate=Cdate(Worksheets("123").Range("V"&nstroka) - тут дата, с которой надо сравнить даты всех других активностей
If Cdate(Range(...))>sdate - это сравнение даты другой активности с присвоенной строкой выше датой
Тоже результат некорректный. Придумал убрать все знаки в числе, свести эти даты к одному большому целому числу и сравнивать уже их, но мне кажется, что есть решение проще и я просто неправильно задаю формат.
Вот. Прошу вашей помощи :)
 
Int(дата)
Целое от даты с временем - это дата без времени.
 
Код
If Replace(CDbl(CDate(Range("...."))), ",", ".") > Replace(CDbl(CDate(sdate)), ",", ".") 
Изменено: Kuzmich - 21.01.2020 12:26:35
 
Спасибо!
Страницы: 1
Наверх