Innehållsförteckning
FileDateTime Beskrivning
Returnerar datum och tid då en fil skapades eller senast ändrades.
Enkelt FileDateTime -exempel
Anta att filen “D: \ test.txt” senast ändrades 21/10/2019 09:41:30.
| 1 | MsgBox FileDateTime ("D: \ test.txt") |
Detta återkommer 21/10/2019 09:41:30.
FileDateTime Syntax
I VBA Editor kan du skriva "FileDateTime (" för att se syntaxen för FileDateTime -funktionen:
Funktionen FileDateTime innehåller ett argument:
Sökvägsnamn: Ett stränguttryck som representerar en fil/mapp/enhet.
Exempel på Excel VBA FileDateTime -funktion
För att lista den senast ändrade tiden för mappen och filerna på C -enheten kan du använda följande kod.
| 123456789101112131415161718192021222324 | Sub Dir_Example ()Dim filnamn som strängDim fullName som strängDim rng As RangeDim i As IntegerStäll in rng = Range ("A1")fileName = Dir ("C: \", vbDirectory)jag = 1DofullName = "C: \" och filnamnrng.Offset (i, 0) = filnamnrng.Offset (i, 1) = FileDateTime (fullName)rng.Offset (i, 2) = FileLen (fullName)rng.Offset (i, 3) = GetAttr (fullName)fileName = DirOm fileName = "" Avsluta Göri = i + 1SlingaAvsluta Sub |
Resultatet blir liknande med följande.
