Indholdsfortegnelse
Beskrivelse af FileDateTime
Returnerer dato og klokkeslæt for, hvornår en fil blev oprettet eller senest ændret.
Enkelt FileDateTime -eksempel
Antag, at en fil “D: \ test.txt” sidst blev ændret den 21/10/2019 09:41:30.
| 1 | MsgBox FileDateTime ("D: \ test.txt") |
Dette vender tilbage 21/10/2019 9:41:30 AM.
Syntaks for FileDateTime
I VBA Editor kan du skrive "FileDateTime (" for at se syntaksen for FileDateTime -funktionen:
FileDateTime -funktionen indeholder et argument:
Stienavn: Et strengudtryk, der repræsenterer en fil/mappe/drev.
Eksempler på Excel VBA FileDateTime -funktion
For at få vist den sidste ændrede tid for mappen og filerne på C -drev, kan du bruge følgende kode.
| 123456789101112131415161718192021222324 | Sub Dir_Example ()Dim filnavn som strengDim fuldnavn som strengDim rng Som områdeDim i As IntegerIndstil rng = Range ("A1")fileName = Dir ("C: \", vbDirectory)jeg = 1GørfullName = "C: \" & filnavnrng.Offset (i, 0) = filnavnrng.Offset (i, 1) = FileDateTime (fuldnavn)rng.Offset (i, 2) = FileLen (fuldnavn)rng.Offset (i, 3) = GetAttr (fuldnavn)filnavn = DirHvis fileName = "" Så afslut Doi = i + 1SløjfeAfslut Sub |
Resultatet vil være det samme med følgende.
