Sadržaj
FileDateTime Opis
Vraća datum i vrijeme stvaranja ili posljednje izmjene datoteke.
Primjer jednostavnog FileDateTimea
Pretpostavimo da je datoteka “D: \ test.txt” posljednji put izmijenjena 21. 10. 2019 u 9:41:30.
1 | MsgBox FileDateTime ("D: \ test.txt") |
Ovo će se vratiti 21.10.2019 9:41:30.
Sintaksa FileDateTime
U VBA Editor -u možete upisati "FileDateTime (" da biste vidjeli sintaksu za funkciju FileDateTime:
Funkcija FileDateTime sadrži argument:
Ime putanje: Nizni izraz koji predstavlja datoteku/mapu/pogon.
Primjeri Excel VBA FileDateTime funkcije
Za popis posljednjeg izmijenjenog vremena mape i datoteka na pogonu C možete upotrijebiti sljedeći kôd.
123456789101112131415161718192021222324 | Podređeni_primjer ()Dim fileName As StringDim fullName As StringDim rng As RangeDim i Kao cijeli brojPostavi rng = raspon ("A1")fileName = Dir ("C: \", vbDirectory)i = 1ČinifullName = "C: \" & fileNamerng.Offset (i, 0) = fileNamerng.Offset (i, 1) = FileDateTime (puno ime)rng.Offset (i, 2) = FileLen (puno ime)rng.Offset (i, 3) = GetAttr (puno ime)fileName = DirIf fileName = "" Zatim izađite iz Doi = i + 1PetljaKraj podm |
Rezultat će biti sličan sa sljedećim.