Полный новичок здесь, мне нужно найти максимальную (самую последнюю) дату в столбце и скопировать ее на новый автоматически сгенерированный лист.
Использование Application.WorksheetFunction.Max, похоже, не работает длямне.Что я делаю не так?
dtrng (диапазон дат) - это диапазон, dtcom (дата завершена) и dtcom2 - строки.Не уверен, что это то, что они должны быть.ws - это оригинальная рабочая таблица.Код для их копирования:
Set dtrng = ws.Range("S4:S1000")
dtcom = Application.WorksheetFunction.Max(dtrng)
dtcom2 = CDate(dtcom)
В настоящее время он просто дает мне 0.
Приветствия, EJ