Inhoudsopgave
BestandDateTijd Beschrijving
Retourneert de datum en tijd waarop een bestand is gemaakt of voor het laatst is gewijzigd.
Eenvoudig FileDateTime-voorbeeld
Stel dat een bestand "D:\test.txt" voor het laatst is gewijzigd op 21-10-2019 9:41:30 AM.
1 | MsgBox FileDateTime("D:\test.txt") |
Dit keert terug op 21-10-2019 9:41:30 AM.
FileDateTime-syntaxis
In de VBA-editor kunt u "FileDateTime(" typen om de syntaxis voor de FileDateTime-functie te zien:
De functie FileDateTime bevat een argument:
Padnaam: Een tekenreeksexpressie die een bestand/map/station vertegenwoordigt.
Voorbeelden van Excel VBA FileDateTime-functie
Om de laatst gewijzigde tijd van de map en bestanden op de C-schijf weer te geven, kunt u de volgende code gebruiken.
123456789101112131415161718192021222324 | Sub Dir_Example()Dim bestandsnaam als stringVolledige naam dimmen als stringDim rng als bereikDim ik als geheel getalStel rng = Bereik ("A1") infileName = Dir("C:\", vbDirectory)ik = 1DoenfullName = "C:\" & bestandsnaamrng.Offset(i, 0) = bestandsnaamrng.Offset(i, 1) = FileDateTime(fullName)rng.Offset(i, 2) = FileLen(volledige naam)rng.Offset(i, 3) = GetAttr(volledigeNaam)bestandsnaam = mapIf fileName = "" Dan Afsluiten Doik = ik + 1LusEinde sub |
Het resultaat zal vergelijkbaar zijn met het volgende.