Satura rādītājs
FileDateTime apraksts
Atgriež datumu un laiku, kad fails tika izveidots vai pēdējo reizi mainīts.
Vienkāršs FileDateTime piemērs
Pieņemsim, ka fails “D: \ test.txt” pēdējo reizi tika mainīts 21.10.2019 09:41:30.
1 | MsgBox FileDateTime ("D: \ test.txt") |
Tas atgriezīsies 21.10.2019 09:41:30.
FileDateTime sintakse
VBA redaktorā varat ierakstīt “FileDateTime (”), lai redzētu funkcijas FileDateTime sintaksi:
Funkcija FileDateTime satur šādu argumentu:
PathName: Virknes izteiksme, kas apzīmē failu/mapi/disku.
Funkcijas Excel VBA FileDateTime piemēri
Lai uzskaitītu mapes un failu pēdējo mainīto laiku C diskā, varat izmantot šādu kodu.
123456789101112131415161718192021222324 | Subdir_Example ()Dim failu nosaukums kā virkneAptumšot pilnu nosaukumu kā virkneDim rng As RangeDim i As IntegerIestatīt rng = Diapazons ("A1")fileName = Dir ("C: \", vbDirectory)i = 1VaifullName = "C: \" & faila nosaukumsrng. Offset (i, 0) = faila nosaukumsrng.Offset (i, 1) = FileDateTime (fullName)rng.Offset (i, 2) = FileLen (fullName)rng. Offset (i, 3) = GetAttr (fullName)fileName = RežJa fileName = "" Tad izejiet Doi = i + 1CilpaBeigu apakš |
Rezultāts būs līdzīgs ar sekojošo.