Содержание
FileDateTime Описание
Возвращает дату и время создания или последнего изменения файла.
Простой пример FileDateTime
Предположим, что файл «D: \ test.txt» последний раз изменялся 21.10.2019 в 9:41:30.
1 | MsgBox FileDateTime ("D: \ test.txt") |
Это вернет 21.10.2019 9:41:30 AM.
Синтаксис FileDateTime
В редакторе VBA вы можете ввести «FileDateTime (», чтобы увидеть синтаксис функции FileDateTime:
Функция FileDateTime содержит аргумент:
Имя пути: Строковое выражение, представляющее файл / папку / диск.
Примеры функции Excel VBA FileDateTime
Чтобы указать время последнего изменения папки и файлов на диске C, вы можете использовать следующий код.
123456789101112131415161718192021222324 | Sub Dir_Example ()Dim fileName As StringDim fullName As StringDim rng As RangeDim i как целое числоУстановить rng = Range ("A1")fileName = Dir ("C: \", vbDirectory)я = 1ДелатьfullName = "C: \" & fileNamerng.Offset (i, 0) = имя файлаrng.Offset (i, 1) = FileDateTime (fullName)rng.Offset (i, 2) = FileLen (полное имя)rng.Offset (i, 3) = GetAttr (fullName)fileName = DirЕсли fileName = "" Тогда Выйти Сделатья = я + 1ПетляКонец подписки |
Результат будет аналогичен следующему.