Съдържание
Описание на FileDateTime
Връща датата и часа, когато файлът е създаден или последно променен.
Прост пример за FileDateTime
Да приемем, че файл „D: \ test.txt“ е последно променен на 21.10.2019 9:41:30.
1 | MsgBox FileDateTime ("D: \ test.txt") |
Това ще се върне на 21.10.2019 9:41:30.
Синтаксис на FileDateTime
В редактора на VBA можете да въведете „FileDateTime (“, за да видите синтаксиса за функцията FileDateTime:
Функцията FileDateTime съдържа аргумент:
Име на път: Низов израз, представляващ файл/папка/устройство.
Примери за Excel VBA FileDateTime функция
За да изброите последното променено време на папката и файловете на C устройство, можете да използвате следния код.
123456789101112131415161718192021222324 | Sub Dir_Example ()Dim fileName As StringDim fullName As StringDim rng As RangeDim i As IntegerЗадайте rng = Обхват ("A1")fileName = Dir ("C: \", vbDirectory)i = 1НаправетеfullName = "C: \" & fileNamerng.Offset (i, 0) = fileNamerng.Offset (i, 1) = FileDateTime (пълно име)rng.Offset (i, 2) = FileLen (пълно име)rng.Offset (i, 3) = GetAttr (пълно име)fileName = РежIf fileName = "" След това излезте от Doi = i + 1ЦикълEnd Sub |
Резултатът ще бъде подобен със следното.