Меню Закрыть

Vba дата изменения файла

Функция FileDateTime позволяет узнать дату и время последней модификации файла. Перед вызовом функции есть смысл проверить существование файла с помощью функции Dir. Если файл с момента своего создания не модифицировался, время и дата последней модификации совпадают со временем и датой создания файла

Возвращает значение типа Variant(Date) , содержащее дату и время последней модификации файла

Это мой первый вопрос, задающий вопрос, поэтому, надеюсь, я следую протоколу. Это относится к "получить список поддиректоров в vba" получить список поддиректоров в vba.

Я нашел пример Brett # 1 — использование FileScriptingObject наиболее полезно. Но есть еще один элемент данных (DateLastModified), который мне нужен в результатах. Я попытался изменить код, но продолжаю получать недопустимую ошибку классификатора. Вот изменения кода, которые я сделал:

  • Диапазон ( "A1: C1" ) = Массив ( "Имя файла", "Путь", "Дата последнего изменения" ).
  • Do While loop добавил this = > Ячейки (i, 3) = myFile.DateLastModified.

Порадуем помочь включить "Дата последнего изменения".

Сантош здесь полный код с комментариями, указывающими изменения.

Функция LastFile предназначена для поиска самого свежего файла в заданной папке

(производится поиск файлов по маске, и из найденных файлов выбирается тот, дата последнего изменения которого максимальна)

Пример использования функции:

  • 16158 просмотров

Комментарии

Подскажите, пожалуйста, зачем вы добавляете значок $ в конце переменных?

А этот код можно модифицировать , чтобы искало самый последний добавленый в папку файл. Я так понимаю , что вместо "FileDateTime" нухно какой то другой оператор вставить , но нигде не могу найти какой

Владимир, если вы знаете, как найти такой файл вручную, — то это можно сделать и макросом.
Макрос может анализировать любые свойства файла (дату создания, изменения), или содержимое файла.

Читайте также:  Bitrix не работает отправка почты

Скажите есть ли способ найти последний добавленный файл в папку?

Рекомендуем к прочтению

Добавить комментарий

Ваш адрес email не будет опубликован.